diff options
author | Kim F. Storm <storm@cua.dk> | 2002-02-25 10:50:29 +0000 |
---|---|---|
committer | Kim F. Storm <storm@cua.dk> | 2002-02-25 10:50:29 +0000 |
commit | cdf074531a6b13f94d4eb2f85cbcc5074cd85c41 (patch) | |
tree | 135fc69fd37e8ed646d1d17e44c77b1cacb15241 /lisp/shell.el | |
parent | 565f89ec063da8226d29f5aa6300e72e732b89eb (diff) | |
download | emacs-cdf074531a6b13f94d4eb2f85cbcc5074cd85c41.tar.gz |
(shell-mode-map): Add "Complete" header so completion
menu is shown on the menu bar in shell mode.
Diffstat (limited to 'lisp/shell.el')
-rw-r--r-- | lisp/shell.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/shell.el b/lisp/shell.el index f273540996b..a57106a82fd 100644 --- a/lisp/shell.el +++ b/lisp/shell.el @@ -315,7 +315,8 @@ Thus, this does not include the shell's current directory.") (define-key shell-mode-map "\M-?" 'comint-dynamic-list-filename-completions) (define-key shell-mode-map [menu-bar completion] - (copy-keymap (lookup-key comint-mode-map [menu-bar completion]))) + (cons "Complete" + (copy-keymap (lookup-key comint-mode-map [menu-bar completion])))) (define-key-after (lookup-key shell-mode-map [menu-bar completion]) [complete-env-variable] '("Complete Env. Variable Name" . shell-dynamic-complete-environment-variable) |