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

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

[elpa] externals/consult 65f87c0 2/5: Fix consult-customize


From: ELPA Syncer
Subject: [elpa] externals/consult 65f87c0 2/5: Fix consult-customize
Date: Tue, 1 Jun 2021 14:57:08 -0400 (EDT)

branch: externals/consult
commit 65f87c0f1c35b212dab0c6941558df232eeacf8d
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Fix consult-customize
---
 consult.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/consult.el b/consult.el
index fbe19f0..32988ae 100644
--- a/consult.el
+++ b/consult.el
@@ -501,11 +501,11 @@ Size of private unicode plane b.")
   "Set property PROP to VAL of commands CMDS."
   (dolist (cmd cmds)
     (cond
-     ((commandp cmd)
+     ((and (boundp cmd) (consp (symbol-value cmd)))
+      (set cmd (plist-put (symbol-value cmd) prop val)))
+     ((functionp cmd)
       (setf (alist-get cmd consult--read-config)
             (plist-put (alist-get cmd consult--read-config) prop val)))
-     ((boundp cmd)
-      (set cmd (plist-put (symbol-value cmd) prop val)))
      (t (user-error "%s is neither a Consult command nor a Consult source"
                     cmd))))
   nil)



reply via email to

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