Mercurial > emacs
changeset 64000:e1ccb8b46dea
(comint-completion, comint-source): Finsh `degroup' descriptions with period.
(comint-dynamic-list-input-ring, comint-dynamic-list-completions):
"?\ " -> "?\s".
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Mon, 04 Jul 2005 01:49:19 +0000 |
parents | 7c759dd7ab37 |
children | 82d080bf4f42 |
files | lisp/comint.el |
diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/comint.el Mon Jul 04 01:46:37 2005 +0000 +++ b/lisp/comint.el Mon Jul 04 01:49:19 2005 +0000 @@ -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 @@ (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 @@ (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))))))