[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/vertico f4756b15f7: vertico-multiform: Ensure that swit
From: |
ELPA Syncer |
Subject: |
[elpa] externals/vertico f4756b15f7: vertico-multiform: Ensure that switching from unobtrusive to flat works |
Date: |
Mon, 3 Jan 2022 09:57:48 -0500 (EST) |
branch: externals/vertico
commit f4756b15f70e0fa6bc061c7207a09c37c8b1e501
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
vertico-multiform: Ensure that switching from unobtrusive to flat works
---
extensions/vertico-multiform.el | 13 +++++--------
1 file changed, 5 insertions(+), 8 deletions(-)
diff --git a/extensions/vertico-multiform.el b/extensions/vertico-multiform.el
index 38687f0465..603ab1fc73 100644
--- a/extensions/vertico-multiform.el
+++ b/extensions/vertico-multiform.el
@@ -164,17 +164,14 @@ APP is the original function call."
(funcall mode 1)
(push mode (car vertico-multiform--stack))))
-(defun vertico--multiform--display-disable-all ()
- "Disable all display modes."
- (dolist (m '(vertico-flat-mode vertico-grid-mode
- vertico-reverse-mode vertico-unobtrusive-mode))
- (vertico-multiform--display-disable m)))
-
(defun vertico-multiform--display-toggle (mode)
"Toggle display MODE temporarily in minibuffer."
+ (dolist (m '(vertico-unobtrusive-mode vertico-flat-mode
+ vertico-grid-mode vertico-reverse-mode))
+ (unless (eq m mode)
+ (vertico-multiform--display-disable m)))
(if (and (boundp mode) (symbol-value mode))
- (vertico-multiform--display-disable mode)
- (vertico--multiform--display-disable-all)
+ (vertico--multiform--display-disable-all)
(vertico-multiform--display-enable mode)))
(defmacro vertico-multiform--display-define-toggle (name)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/vertico f4756b15f7: vertico-multiform: Ensure that switching from unobtrusive to flat works,
ELPA Syncer <=