From 3d73d14b22808e0b2ebc4322d29de473f7225193 Mon Sep 17 00:00:00 2001 From: David Morgan Date: Tue, 31 May 2022 09:30:34 +0100 Subject: [PATCH] Add function to quit minibuffer from outside --- .emacs.d/lisp/init-minibuffer.el | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/.emacs.d/lisp/init-minibuffer.el b/.emacs.d/lisp/init-minibuffer.el index abd4006..cd14bfc 100644 --- a/.emacs.d/lisp/init-minibuffer.el +++ b/.emacs.d/lisp/init-minibuffer.el @@ -66,11 +66,17 @@ DEFS is a plist associating completion categories to commands." (select-window (minibuffer-selected-window)) (select-window (active-minibuffer-window)))) + (defun minibuffer-really-quit () + "Quit minibuffer session, even if it is not the selected window." + (interactive) + (with-selected-window (active-minibuffer-window) + (minibuffer-keyboard-quit))) + :bind (("C-M-<" . up-from-outside) ("C-M->" . down-from-outside) ("C-M-+" . preview-from-outside) ("M-X" . to-and-fro-minibuffer) - ("C-M-S-g" . minibuffer-keyboard-quit))) + ("C-M-S-g" . minibuffer-really-quit))) (use-package vertico-directory :ensure nil