From: Juanma Barranquero <lekktu@gmail.com>
Date: Mon, 4 Jul 2005 01:49:19 +0000 (+0000)
Subject: (comint-completion, comint-source): Finsh `degroup' descriptions with period.
X-Git-Tag: emacs-pretest-22.0.90~8441
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9049a096e09bdd5da196aa9ddca5fec63df54f3b;p=emacs.git

(comint-completion, comint-source): Finsh `degroup' descriptions with period.
(comint-dynamic-list-input-ring, comint-dynamic-list-completions):
"?\ " -> "?\s".
---

diff --git a/lisp/comint.el b/lisp/comint.el
index 20b365e9fe1..e751926912f 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -146,11 +146,11 @@
   :group 'processes)
 
 (defgroup comint-completion nil
-  "Completion facilities in comint"
+  "Completion facilities in comint."
   :group 'comint)
 
 (defgroup comint-source nil
-  "Source finding facilities in comint"
+  "Source finding facilities in comint."
   :prefix "comint-"
   :group 'comint)
 
@@ -986,7 +986,7 @@ See also `comint-read-input-ring'."
       (message "Hit space to flush")
       (setq comint-dynamic-list-input-ring-window-conf conf)
       (let ((ch (read-event)))
-	(if (eq ch ?\ )
+	(if (eq ch ?\s)
 	    (set-window-configuration conf)
 	  (setq unread-command-events (list ch)))))))
 
@@ -2930,7 +2930,7 @@ Typing SPC flushes the help buffer."
 	  (progn
 	    (mouse-choose-completion first)
 	    (set-window-configuration comint-dynamic-list-completions-config))
-	(unless (eq first ?\ )
+	(unless (eq first ?\s)
 	  (setq unread-command-events (listify-key-sequence key)))
 	(unless (eq first ?\t)
 	  (set-window-configuration comint-dynamic-list-completions-config))))))