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

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

[nongnu] elpa/keycast f235bd8cb6 1/3: keycast--maybe-edit-local-format:


From: ELPA Syncer
Subject: [nongnu] elpa/keycast f235bd8cb6 1/3: keycast--maybe-edit-local-format: Use keycast--tree-member
Date: Sun, 25 Feb 2024 19:00:21 -0500 (EST)

branch: elpa/keycast
commit f235bd8cb66d6ccc04d30bd07931d9da9f3cca9b
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    keycast--maybe-edit-local-format: Use keycast--tree-member
    
    While we used `memq' we could end up adding an additional element.
    
    Closes #33.
---
 keycast.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/keycast.el b/keycast.el
index 55ffb37bd3..ccc0c072b4 100644
--- a/keycast.el
+++ b/keycast.el
@@ -452,8 +452,7 @@ t to show the actual COMMAND, or a symbol to be shown 
instead."
 
 (defun keycast--maybe-edit-local-format (format item record)
   (let ((value (buffer-local-value format (current-buffer))))
-    (unless (and (listp value)
-                 (memq item value))
+    (unless (keycast--tree-member item value)
       (set record (cons (current-buffer) (symbol-value record)))
       (set format (if (keycast--format-atom-p value)
                       (list "" item value)



reply via email to

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