org-attach: Silence byte-compiler
* lisp/org-attach.el (org-attach-attach): Tiny refactoring.
This commit is contained in:
parent
e23b806bd8
commit
9a297d6531
|
@ -286,6 +286,12 @@ Call ~org-agenda-set-restriction-lock~ from the agenda.
|
|||
|
||||
** Miscellaneous
|
||||
|
||||
*** Org Attach obeys ~dired-dwim-target~
|
||||
|
||||
When a Dired buffer is opened next to the Org document being edited,
|
||||
the prompt for file to attach can start in the Dired buffer's
|
||||
directory if `dired-dwim-target' in non-nil.
|
||||
|
||||
*** More specific anniversary descriptions
|
||||
|
||||
Anniversary descriptions (used in the agenda view, for instance)
|
||||
|
|
|
@ -42,6 +42,8 @@
|
|||
(require 'org-id)
|
||||
(require 'vc-git)
|
||||
|
||||
(declare-function dired-dwim-target-directory "dired-aux")
|
||||
|
||||
(defgroup org-attach nil
|
||||
"Options concerning entry attachments in Org mode."
|
||||
:tag "Org Attach"
|
||||
|
@ -406,7 +408,7 @@ METHOD may be `cp', `mv', `ln', `lns' or `url' default taken from
|
|||
(org-attach-store-link file)))
|
||||
(if visit-dir
|
||||
(dired attach-dir)
|
||||
(message "File \"%s\" is now a task attachment." basename)))))
|
||||
(message "File %S is now a task attachment." basename)))))
|
||||
|
||||
(defun org-attach-attach-cp ()
|
||||
"Attach a file by copying it."
|
||||
|
|
Loading…
Reference in New Issue