Mercurial > emacs
changeset 17148:10107950ac5e
(inferior-emacs-lisp-mode): Set comint-completion-addsuffix.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Wed, 12 Mar 1997 00:29:09 +0000 |
| parents | 2824e1f84717 |
| children | b6b657de23f3 |
| files | lisp/ielm.el |
| diffstat | 1 files changed, 4 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ielm.el Wed Mar 12 00:23:49 1997 +0000 +++ b/lisp/ielm.el Wed Mar 12 00:29:09 1997 +0000 @@ -89,7 +89,7 @@ (defvar ielm-header (concat "*** Welcome to IELM version " - (substring "$Revision: 1.7 $" 11 -2) + (substring "$Revision: 1.8 $" 11 -2) " *** Type (describe-mode) for help.\n" "IELM has ABSOLUTELY NO WARRANTY; type (describe-no-warranty) for details.\n") "Message to display when IELM is started.") @@ -405,6 +405,9 @@ (setq comint-dynamic-complete-functions '(ielm-tab comint-replace-by-expanded-history ielm-complete-filename ielm-complete-symbol)) (setq comint-get-old-input 'ielm-get-old-input) + (make-local-variable 'comint-completion-addsuffix) + (setq comint-completion-addsuffix + (cons (char-to-string directory-sep-char) "")) (setq major-mode 'inferior-emacs-lisp-mode) (setq mode-name "IELM")