awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-01 12:17:25 -05:00
Code Issues Packages Projects Releases Wiki Activity

Fix void-variable recentf-exclude

Browse Source
This commit is contained in:
Henrik Lissner
2017-06-05 16:56:13 +02:00
parent d4761a7c6d
commit 1906de46e8
2 changed files with 10 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
modules/lang/org/+agenda.el
View File

@ -9,12 +9,13 @@
org-agenda-inhibit-startup t
org-agenda-skip-unavailable-files nil)
;; Don't clobber recentf with agenda files
(defun +org-is-agenda-file (filename)
(cl-find (file-truename filename) org-agenda-files
:key #'file-truename
:test #'equal))
(add-to-list 'recentf-exclude #'+org-is-agenda-file)
(after! recentf
;; Don't clobber recentf with agenda files
(defun +org-is-agenda-file (filename)
(cl-find (file-truename filename) org-agenda-files
:key #'file-truename
:test #'equal))
(add-to-list 'recentf-exclude #'+org-is-agenda-file))
;;
(map! :map org-agenda-mode-map

5
modules/lang/org/+attach.el
View File

@ -13,9 +13,10 @@
(defun +org|init-attach ()
(setq org-attach-directory +org-attachment-dir)
;; Don't track attachments in recentf or projectile
(push (format "/%s.+$" (regexp-quote +org-attachment-dir)) recentf-exclude)
;; Don't track attachments in projectile or recentf
(push ".attach" projectile-globally-ignored-file-suffixes)
(after! recentf
(push (format "/%s.+$" (regexp-quote +org-attachment-dir)) recentf-exclude))
;; FIXME Use all-the-icons
;; (doom-fix-unicode '("FontAwesome" 13) ? ? ? ? ? ? ? ?)