changeset 8559:509daefd2d13

(choose-completion-string): Use plain exit-minibuffer, not minibuffer-complete-and-exit. And do so only if the minibuffer was doing completion.
author Richard M. Stallman <rms@gnu.org>
date Wed, 17 Aug 1994 22:33:37 +0000
parents 30f91aa9b364
children 42b300c5ac5d
files lisp/simple.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/simple.el	Wed Aug 17 22:31:16 1994 +0000
+++ b/lisp/simple.el	Wed Aug 17 22:33:37 1994 +0000
@@ -2548,7 +2548,8 @@
 	(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.