ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

* org-attach.el (org-attach-reveal, org-attach-reveal-in-emacs): Fix the docstrings.

This commit is contained in:
Nicolas Richard 2012-12-12 19:09:58 +01:00 committed by Bastien Guerry
parent f82004840a
commit da0276cba5
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/org-attach.el
View File

@ -425,14 +425,14 @@ This ignores files starting with a \".\", and files ending in \"~\"."
(directory-files dir nil "[^~]\\'")))) (directory-files dir nil "[^~]\\'"))))
(defun org-attach-reveal (&optional if-exists) (defun org-attach-reveal (&optional if-exists)
"Show the attachment directory of the current task in dired." "Show the attachment directory of the current task.
This will attempt to use an external program to show the directory."
(interactive "P") (interactive "P")
(let ((attach-dir (org-attach-dir (not if-exists)))) (let ((attach-dir (org-attach-dir (not if-exists))))
(and attach-dir (org-open-file attach-dir)))) (and attach-dir (org-open-file attach-dir))))
(defun org-attach-reveal-in-emacs () (defun org-attach-reveal-in-emacs ()
"Show the attachment directory of the current task. "Show the attachment directory of the current task in dired."
This will attempt to use an external program to show the directory."
(interactive) (interactive)
(let ((attach-dir (org-attach-dir t))) (let ((attach-dir (org-attach-dir t)))
(dired attach-dir))) (dired attach-dir)))