diff options
author | Karl Heuer <kwzh@gnu.org> | 1997-03-12 00:29:09 +0000 |
---|---|---|
committer | Karl Heuer <kwzh@gnu.org> | 1997-03-12 00:29:09 +0000 |
commit | 34ce46c8086b88ff86075dc5dd93b059d6fd8d51 (patch) | |
tree | d039cc793d69ded5c55965f586f1d0226b54496b /lisp/ielm.el | |
parent | 3b4956e86847edf8db3bdc87413771ca51d48d5c (diff) | |
download | emacs-34ce46c8086b88ff86075dc5dd93b059d6fd8d51.tar.gz |
(inferior-emacs-lisp-mode): Set comint-completion-addsuffix.
Diffstat (limited to 'lisp/ielm.el')
-rw-r--r-- | lisp/ielm.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/ielm.el b/lisp/ielm.el index afc2fa3a858..a5ce307a3d1 100644 --- a/lisp/ielm.el +++ b/lisp/ielm.el @@ -89,7 +89,7 @@ This variable is buffer-local.") (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 @@ Customised bindings may be defined in `ielm-map', which currently contains: (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") |