From: Eshel Yaron <me@eshelyaron.com>
Date: Sat, 19 Oct 2024 14:32:39 +0000 (+0200)
Subject: Kill *Completions* buffer on M-: minibuffer exit
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8dd605a419f90406f7f6cc9cee5b9ce9e8b60dce;p=emacs.git

Kill *Completions* buffer on M-: minibuffer exit
---

diff --git a/lisp/simple.el b/lisp/simple.el
index f05d865f6b7..c5bbb7d6e89 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -2045,6 +2045,8 @@ function `read-from-minibuffer'."
         (set-syntax-table emacs-lisp-mode-syntax-table)
         (add-hook 'completion-at-point-functions
                   #'elisp-completion-at-point nil t)
+        (add-hook 'minibuffer-exit-hook
+                  #'minibuffer-kill-completions-buffer nil t)
         (run-hooks 'eval-expression-minibuffer-setup-hook))
     (read-from-minibuffer prompt initial-contents
                           read--expression-map t