emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/org 48b237d9e2: org-attach-attach: Fix storing link to


From: ELPA Syncer
Subject: [elpa] externals/org 48b237d9e2: org-attach-attach: Fix storing link to attached files
Date: Mon, 24 Oct 2022 00:58:07 -0400 (EDT)

branch: externals/org
commit 48b237d9e21a4edf528d4bd1ed99d1f3757e4931
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>

    org-attach-attach: Fix storing link to attached files
    
    * lisp/org-attach.el (org-attach-attach): Fix typo when
    `org-attach-store-link-p' is set to t.  Instead of `file', we need
    `attach-file': the link to the attached file, not the original.
---
 lisp/org-attach.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/org-attach.el b/lisp/org-attach.el
index 8509a65649..6af8364fc7 100644
--- a/lisp/org-attach.el
+++ b/lisp/org-attach.el
@@ -548,8 +548,8 @@ METHOD may be `cp', `mv', `ln', `lns' or `url' default 
taken from
                         (file-name-nondirectory attach-file))
                   org-stored-links))
             ((eq org-attach-store-link-p t)
-             (push (list (concat "file:" file)
-                        (file-name-nondirectory file))
+             (push (list (concat "file:" attach-file)
+                        (file-name-nondirectory attach-file))
                   org-stored-links))
            ((eq org-attach-store-link-p 'file)
             (push (list (concat "file:" attach-file)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]