.emacs.d

commit e271cd136ad3b6ccbcdeb91fc2aa79a0f09865a3
parent 788f0146d20e0c37365c7a870787725112ebe321
Author: andsy10 <andsy1016@gmail.com>
Date:   Thu,  8 Oct 2026 22:42:02 +0800

Cleanup recentf-exclude entries

Diffstat:
M
lisp/init-base.el
 | 
6
------
M
lisp/init-org.el
 | 
4
+++-
M
lisp/init-package.el
 | 
1
+
M
lisp/init-terminal.el
 | 
4
----

4 files changed, 4 insertions(+), 11 deletions(-)
diff --git a/lisp/init-base.el b/lisp/init-base.el
@@ -56,12 +56,6 @@
           "^/tmp/" "^/var/folders/.+$" "^/ssh:" "/persp-confs/"
           (lambda (file) (file-in-directory-p file package-user-dir))))
   :config
-  (if *is-android*
-      (add-to-list 'recentf-exclude "~/storage/shared/my-org-note/journal/.*\\.org\\'")
-    (add-to-list 'recentf-exclude "~/org/my-org-note/journal/.*\\.org\\'")
-    (add-to-list 'recentf-exclude "~/org/my-org-note/20260509T232442==agenda--all-my-todos\\.org")
-    (add-to-list 'recentf-exclude "~/org/my-org-note/20260810T233455==agenda--all-about-game__game\\.org"))
-  (add-to-list 'recentf-exclude "~/.emacs.d/emms/history")
   (add-to-list 'recentf-exclude "~/.emacs.d/bookmarks")
   (add-to-list 'recentf-exclude "~/hywiki/.hywiki.eld"))
 
diff --git a/lisp/init-org.el b/lisp/init-org.el
@@ -80,6 +80,7 @@
   (setq org-agenda-files
         `(,(concat org-directory "/20260509T232442==agenda--all-my-todos.org")
           ,(concat org-directory "/20260810T233455==agenda--all-about-game__game.org")))
+  (setq recentf-exclude (cl-union org-agenda-files recentf-exclude :test 'equal))
 
   (setq org-agenda-span 'day)
   (setq org-agenda-skip-function-global
@@ -217,7 +218,8 @@
   (advice-add 'calendar-redraw :after #'denote-journal-calendar-mark-dates)
 
   :init
-  (setq denote-journal-directory (expand-file-name "journal" denote-directory))
+  (setq denote-journal-directory (concat denote-directory "/journal"))
+  (add-to-list 'recentf-exclude denote-journal-directory)
   (setq denote-journal-keyword nil)
   (setq denote-journal-signature "journal")
   (setq denote-journal-keyword "daily"))
diff --git a/lisp/init-package.el b/lisp/init-package.el
@@ -246,6 +246,7 @@ against its previous revision."
   :commands
   (emms-playlist-mode-switch-buffer)
   :config
+  (add-to-list 'recentf-exclude "~/.emacs.d/emms/history")
   (emms-all)
   (setq emms-player-list '(emms-player-vlc)
         emms-info-functions '(emms-info-native))
diff --git a/lisp/init-terminal.el b/lisp/init-terminal.el
@@ -79,10 +79,6 @@
   :init
   (setq recentf-max-saved-items 30)
   :config
-  (add-to-list 'recentf-exclude "~/org/my-org-note/journal/.*\\.org\\'")
-  (add-to-list 'recentf-exclude "~/org/my-org-note/20260509T232442==agenda--all-my-todos\\.org")
-  (add-to-list 'recentf-exclude "~/org/my-org-note/20260810T233455==agenda--all-about-game__game\\.org")
-  (add-to-list 'recentf-exclude "~/.emacs.d/emms/history")
   (add-to-list 'recentf-exclude "~/.emacs.d/bookmarks"))
 
 (use-package savehist