[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.