diff options
| -rw-r--r-- | lisp/init-recentf.el | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/lisp/init-recentf.el b/lisp/init-recentf.el index f9380c3..5a9ac1a 100644 --- a/lisp/init-recentf.el +++ b/lisp/init-recentf.el @@ -2,6 +2,13 @@ ;;; Commentary: ;;; Code: +(defun mpolden/recentf-exclude-p (filename) + "Return non-nil if file FILENAME is in a symlinked `user-emacs-directory'." + (and (not (file-remote-p filename)) + (file-in-directory-p filename user-emacs-directory) + (file-symlink-p (directory-file-name user-emacs-directory)) + (not (equal filename (file-truename filename))))) + (use-package recentf :init ;; set number of entries to save @@ -10,6 +17,7 @@ :config ;; ignore files in elpa directory as these may be opened by package.el (add-to-list 'recentf-exclude (expand-file-name "elpa" user-emacs-directory)) + (add-to-list 'recentf-exclude #'mpolden/recentf-exclude-p) (recentf-mode 1)) (provide 'init-recentf) |