Mercurial > emacs

changeset 7846:46db50437ebb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(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.