awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-09-28 16:51:08 -05:00
Code Issues Packages Projects Releases Wiki Activity

lang/org: resolve +org-dir later

Browse Source 
Gives users more of a chance to change +org-dir before paths are
resolved with it.

Addresses #296
This commit is contained in:
Henrik Lissner
2017-12-24 15:13:36 -05:00
parent 208fbb1726
commit b0c73c486e
2 changed files with 6 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -15,7 +15,7 @@
;; + `+org-attach/url'
;; + :org [FILE/URL]
(defvar +org-attach-dir (expand-file-name ".attach/" +org-dir)
(defvar +org-attach-dir ".attach/"
"Where to store attachments (relative to current org file).")
@@ -30,7 +30,7 @@
(advice-add #'org-download-enable :override #'ignore)
:config
(setq-default org-download-image-dir +org-attach-dir
(setq-default org-download-image-dir org-attach-directory
org-download-heading-lvl nil
org-download-timestamp "_%Y%m%d_%H%M%S")
@@ -61,12 +61,12 @@
;;
(after! org
(setq org-attach-directory +org-attach-dir)
(setq org-attach-directory (expand-file-name +org-attach-dir +org-dir))
(push (car (last (split-string +org-attach-dir "/" t)))
projectile-globally-ignored-directories)
(after! recentf
(push (format "%s.+$" (regexp-quote +org-attach-dir))
(push (format "%s.+$" (regexp-quote org-attach-directory))
recentf-exclude)))