diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2005-07-04 01:49:19 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2005-07-04 01:49:19 +0000 |
| commit | 9049a096e09bdd5da196aa9ddca5fec63df54f3b (patch) | |
| tree | cae66d38d7c20b8bac3eca1cf5fc850246bf138a /lisp/comint.el | |
| parent | 32463e4d0882ffe0cce33bd825f0cfc65687537e (diff) | |
| download | emacs-9049a096e09bdd5da196aa9ddca5fec63df54f3b.tar.gz | |
(comint-completion, comint-source): Finsh `degroup' descriptions with period.
(comint-dynamic-list-input-ring, comint-dynamic-list-completions):
"?\ " -> "?\s".
Diffstat (limited to 'lisp/comint.el')
| -rw-r--r-- | lisp/comint.el | 8 |
1 files changed, 4 insertions, 4 deletions
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)))))) |