Raoul Comninos <revr...@mweb.co.za> writes: > I have copied the code to my dot Emacs, but now when I try to add an > attachment now, it generates this error: > > run-hook-with-args: Wrong number of arguments: (lambda nil "Save list of > attachments to ORG_ATTACH_FILES property." (when-let* ((dir > (org-attach-dir)) (files (org-attach-file-list dir))) (org-set-property > "ORG_ATTACH_FILES" (mapconcat #'identity files ", ")))), 1 > > Can you help me with this?
You can try: (defun 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 #'org-attach-save-file-list-to-property) Also, note that the list of files will only be updated if you attach/delete files calling org-attach. If you change the attachment folder manually, you will need to run M-x org-attach-sync. Best, Ihor