[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/vertico-posframe 80c58b6223 2/3: Better support vertico
From: |
ELPA Syncer |
Subject: |
[elpa] externals/vertico-posframe 80c58b6223 2/3: Better support vertico-multiform |
Date: |
Sun, 19 Feb 2023 22:00:47 -0500 (EST) |
branch: externals/vertico-posframe
commit 80c58b6223061b0e755c746ce21073e344e4a1cb
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@163.com>
Better support vertico-multiform
---
vertico-posframe.el | 6 ++++++
1 file changed, 6 insertions(+)
diff --git a/vertico-posframe.el b/vertico-posframe.el
index 009bef6986..f08e1a9d12 100644
--- a/vertico-posframe.el
+++ b/vertico-posframe.el
@@ -198,6 +198,12 @@ minibuffer will not be hided by minibuffer-cover."
(set-window-vscroll (active-minibuffer-window) 0)
(posframe-hide vertico-posframe--buffer)))))
+(eval-after-load 'vertico-multiform
+ '(progn
+ (cl-pushnew 'vertico-posframe-mode vertico-multiform--display-modes)
+ (vertico-multiform--define-display-toggle posframe)
+ (define-key vertico-multiform-map (kbd "M-P")
#'vertico-multiform-posframe)))
+
(cl-defmethod vertico--setup :after (&context (vertico-posframe-mode (eql t)))
"Setup minibuffer overlay, which pushes the minibuffer content down."
(add-hook 'minibuffer-exit-hook #'vertico-posframe--minibuffer-exit-hook nil
'local))