aciceri/nixfleet
1
0
Fork 0
Code Issues Pull requests 1 Projects Releases Packages Wiki Activity Actions

Track org attached files

Browse source
This commit is contained in:
Andrea Ciceri 2024-11-08 10:20:59 +01:00
parent 59e1329644
commit 2114a9037f
Signed by: aciceri
SSH key fingerprint: SHA256:/AagBweyV4Hlfg9u092n8hbHwD5fcB6A3qhDiDA65Rg
1 changed files with 7 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
hmModules/emacs/init.el
View file

@ -720,7 +720,13 @@ This is meant to be an helper to be called from the window manager."
(set-face-attribute face nil :inherit 'fixed-pitch)) (set-face-attribute face nil :inherit 'fixed-pitch))
(org-babel-do-load-languages (org-babel-do-load-languages
'org-babel-load-languages '((haskell . t)))) 'org-babel-load-languages '((haskell . t)))
(defun ccr/org-attach-save-file-list-to-property (dir)
"Save list of attachments to ORG_ATTACH_FILES property."
(when-let* ((files (org-attach-file-list dir)))
(org-set-property "ORG_ATTACH_FILES" (mapconcat #'identity files ", "))))
(add-hook 'org-attach-after-change-hook #'ccr/org-attach-save-file-list-to-property))
(use-package org-agenda (use-package org-agenda
:custom :custom