Mercurial > emacs
changeset 7846:46db50437ebb
(comint-dynamic-list-completions): No space in *Completions*.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Fri, 10 Jun 1994 23:02:04 +0000 |
parents | 6f6b61216b0b |
children | 43045a12cb34 |
files | lisp/comint.el |
diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/comint.el Fri Jun 10 23:01:49 1994 +0000 +++ b/lisp/comint.el Fri Jun 10 23:02:04 1994 +0000 @@ -1965,17 +1965,17 @@ "List in help buffer sorted COMPLETIONS. Typing SPC flushes the help buffer." (let ((conf (current-window-configuration))) - (with-output-to-temp-buffer " *Completions*" + (with-output-to-temp-buffer "*Completions*" (display-completion-list (sort completions 'string-lessp))) (message "Hit space to flush") (let (key first) (if (save-excursion - (set-buffer (get-buffer " *Completions*")) + (set-buffer (get-buffer "*Completions*")) (setq key (read-key-sequence nil) first (aref key 0)) (and (consp first) (eq (window-buffer (posn-window (event-start first))) - (get-buffer " *Completions*")) + (get-buffer "*Completions*")) (eq (key-binding key) 'mouse-choose-completion))) ;; If the user does mouse-choose-completion with the mouse, ;; execute the command, then delete the completion window.