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

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

[elpa] externals/denote 5ae74c1158 3/6: Change the way denote--used-ids


From: ELPA Syncer
Subject: [elpa] externals/denote 5ae74c1158 3/6: Change the way denote--used-ids is used
Date: Mon, 9 Dec 2024 06:58:48 -0500 (EST)

branch: externals/denote
commit 5ae74c11586a94b6caeaeb309cbae8fd250bf313
Author: Jean-Philippe Gagné Guay <jeanphilippe150@gmail.com>
Commit: Jean-Philippe Gagné Guay <jeanphilippe150@gmail.com>

    Change the way denote--used-ids is used
---
 denote.el | 9 +++------
 1 file changed, 3 insertions(+), 6 deletions(-)

diff --git a/denote.el b/denote.el
index 992c57ce39..a67f49b7ac 100644
--- a/denote.el
+++ b/denote.el
@@ -3678,12 +3678,10 @@ the changes made to the file: perform them outright 
(same as
 setting `denote-rename-confirmations' to a nil value)."
   (declare (interactive-only t))
   (interactive nil dired-mode)
-  (let ((denote--used-ids)
+  (let ((denote--used-ids (denote--get-all-used-ids))
         (denote-rename-confirmations nil))
     (if-let* ((marks (dired-get-marked-files)))
         (progn
-          (unless (seq-every-p #'denote-file-has-identifier-p marks)
-            (setq denote--used-ids (denote--get-all-used-ids)))
           (dolist (file marks)
             (pcase-let ((`(,title ,keywords ,signature ,date)
                          
(denote--rename-get-file-info-from-prompts-or-existing file)))
@@ -3723,8 +3721,7 @@ This function is an internal implementation function."
       (let ((denote-prompts '())
             (denote-rename-confirmations nil)
             (user-input-keywords (denote-keywords-prompt keywords-prompt))
-            (denote--used-ids (unless (seq-every-p 
#'denote-file-has-identifier-p marks)
-                                (denote--get-all-used-ids))))
+            (denote--used-ids (denote--get-all-used-ids)))
         (dolist (file marks)
           (pcase-let* ((`(,title ,keywords ,signature ,date)
                         (denote--rename-get-file-info-from-prompts-or-existing 
file))
@@ -3863,7 +3860,7 @@ they have front matter and what that may be."
                            (denote-file-is-writable-and-supported-p m)
                            (denote-file-has-identifier-p m)))
                     (dired-get-marked-files))))
-      (progn
+      (let ((denote--used-ids (denote--get-all-used-ids)))
         (dolist (file marks)
           (denote-rename-file-using-front-matter file))
         (denote-update-dired-buffers))



reply via email to

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