mirrors/org-mode
0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-09-29 18:36:26 +00:00
Code Releases Activity

Fix bug with getting list of attachments.

Browse source
This commit is contained in:
Carsten Dominik 2008-10-08 14:59:14 +02:00
parent 3d5bc9ab65
commit b0ce57d27d
2 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/ChangeLog
View file

@ -1,3 +1,7 @@
2008-10-08 Carsten Dominik <dominik@science.uva.nl>
* org-attach.el (org-attach-file-list): Fix bug with directory.
2008-10-07 Carsten Dominik <dominik@science.uva.nl>
* org.el (org-apps-regexp-alist): New function.

2
lisp/org-attach.el
View file

@ -270,7 +270,7 @@ This can be used after files have been added externally."
This ignores files starting with a \".\", and files ending in \"~\"."
(delq nil
(mapcar (lambda (x) (if (string-match "^\\." x) nil x))
(directory-files "." nil "[^~]\\'"))))
(directory-files dir nil "[^~]\\'"))))
(defun org-attach-reveal ()
"Show the attachment directory of the current task in dired."