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

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

[elpa] externals/denote c9a01a3718 3/3: Merge pull request #53 from jean


From: ELPA Syncer
Subject: [elpa] externals/denote c9a01a3718 3/3: Merge pull request #53 from jeanphilippegg/renaming-commands
Date: Sun, 17 Jul 2022 12:57:27 -0400 (EDT)

branch: externals/denote
commit c9a01a37181ecd83413f8a3cd326a3c5f3b55071
Merge: befa6d9954 5ca1882ce8
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: GitHub <noreply@github.com>

    Merge pull request #53 from jeanphilippegg/renaming-commands
    
    Renaming commands, minor adjustments
---
 denote-dired.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/denote-dired.el b/denote-dired.el
index 02e0f6351e..70c849c09d 100644
--- a/denote-dired.el
+++ b/denote-dired.el
@@ -319,7 +319,8 @@ appropriate."
 The TITLE, KEYWORDS and ID are passed from the renaming
 command and are used to construct a new front matter block if
 appropriate."
-  (when-let* ((filetype (denote-dired--filetype-heuristics file))
+  (when-let* ((denote--only-note-p file)
+              (filetype (denote-dired--filetype-heuristics file))
               (date (denote--date (date-to-time id)))
               (new-front-matter (denote--file-meta-header title date keywords 
id filetype)))
     (with-current-buffer (find-file-noselect file)
@@ -471,7 +472,7 @@ file-naming scheme."
     (user-error "No marked files; aborting")))
 
 ;;;###autoload
-(defun denote-dired-rename-marked-files-and-add-front-matter ()
+(defun denote-dired-rename-marked-files-and-add-front-matters ()
   "DEV NOTE 2022-07-17: proof of concept---help flesh it out.
 
 Like `denote-dired-rename-marked-files' but also adds front
@@ -499,8 +500,7 @@ doc string)."
                             dir id keywords (denote--sluggify title) 
extension)))
             (rename-file file new-name)
             (denote-dired--rename-buffer file new-name)
-            (when (denote--only-note-p file)
-              (denote-dired--add-front-matter new-name title keywords id))))
+            (denote-dired--add-front-matter new-name title keywords id)))
         (revert-buffer))
     (user-error "No marked files; aborting")))
 



reply via email to

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