From 8881ad9a94437041d137c86d02dc75959f2030a5 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 17 Aug 1994 22:33:37 +0000 Subject: [PATCH] (choose-completion-string): Use plain exit-minibuffer, not minibuffer-complete-and-exit. And do so only if the minibuffer was doing completion. --- lisp/simple.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/simple.el b/lisp/simple.el index 02e8f8cef26..1adcb212151 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -2548,7 +2548,8 @@ it were the arg to `interactive' (which see) to interactively read the value." (set-window-point window (point))) ;; If completing for the minibuffer, exit it with this choice. (and (equal buffer (window-buffer (minibuffer-window))) - (minibuffer-complete-and-exit))))) + minibuffer-completion-table + (exit-minibuffer))))) (defun completion-list-mode () "Major mode for buffers showing lists of possible completions. -- 2.39.5