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

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

[elpa] externals/denote 92e15886d5 20/39: Avoid errors with string value


From: ELPA Syncer
Subject: [elpa] externals/denote 92e15886d5 20/39: Avoid errors with string value for keywords
Date: Mon, 11 Jul 2022 00:57:45 -0400 (EDT)

branch: externals/denote
commit 92e15886d51925711b64042b772078809d4828d6
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Avoid errors with string value for keywords
    
    This is done in order not to break user-level custom code, such as what
    we had in the manual:
    
        (defun prot/denote-journal ()
          "Create an entry tagged 'journal', while prompting for a title."
          (interactive)
          (denote
           (denote--title-prompt)
           "journal"))
---
 denote.el | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/denote.el b/denote.el
index 8a068fabd7..15d613b204 100644
--- a/denote.el
+++ b/denote.el
@@ -370,10 +370,11 @@ trailing hyphen."
 
 (defun denote--sluggify-keywords (keywords)
   "Sluggify KEYWORDS."
-  (mapcar (if denote-allow-multi-word-keywords
-              #'denote--sluggify
-            #'denote--sluggify-and-join)
-          keywords))
+  (let ((kws (if (listp keywords) keywords (list keywords))))
+    (mapcar (if denote-allow-multi-word-keywords
+                #'denote--sluggify
+              #'denote--sluggify-and-join)
+            kws)))
 
 (defun denote--file-empty-p (file)
   "Return non-nil if FILE is empty."



reply via email to

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