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

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

[elpa] externals/vertico 1b7214c959 2/4: vertico-multiform: Turn off mod


From: ELPA Syncer
Subject: [elpa] externals/vertico 1b7214c959 2/4: vertico-multiform: Turn off modes in reverse order
Date: Sun, 2 Jan 2022 07:57:40 -0500 (EST)

branch: externals/vertico
commit 1b7214c9597cefb006ede416643b733f74640e9b
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    vertico-multiform: Turn off modes in reverse order
---
 extensions/vertico-multiform.el | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/extensions/vertico-multiform.el b/extensions/vertico-multiform.el
index 9740671bdd..21c8c01182 100644
--- a/extensions/vertico-multiform.el
+++ b/extensions/vertico-multiform.el
@@ -80,10 +80,12 @@ Has lower precedence than 
`vertico-multiform-command-settings'."
 
 (defun vertico-multiform--toggle (arg)
   "Toggle modes from stack depending on ARG."
-  (when-let (win (active-minibuffer-window))
+  (when-let ((win (active-minibuffer-window))
+             (modes (car vertico-multiform--stack)))
+    (when (= arg -1) (setq modes (reverse modes)))
     (with-selected-window win
-      (dolist (f (car vertico-multiform--stack))
-        (funcall f arg)))))
+      (dolist (m modes)
+        (funcall m arg)))))
 
 (defun vertico-multiform--lookup (key list)
   "Lookup symbolic KEY in LIST.



reply via email to

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