mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-24 07:20:37 +00:00
Code Issues Releases Activity

(choose-completion-string): Use plain exit-minibuffer,

Browse Source 
not minibuffer-complete-and-exit.  And do so only if the minibuffer
was doing completion.
This commit is contained in:
Richard M. Stallman 1994-08-17 22:33:37 +00:00
parent 329ff3a4e7
commit 8881ad9a94
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/simple.el
View File

@ -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.