changeset 43521:c61a65062ae1

(shell-mode-map): Add "Complete" header so completion menu is shown on the menu bar in shell mode.
author Kim F. Storm <storm@cua.dk>
date Mon, 25 Feb 2002 10:49:20 +0000
parents 75f8611ccbb4
children 6d7aa871f8d0
files lisp/shell.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/shell.el	Mon Feb 25 07:26:15 2002 +0000
+++ b/lisp/shell.el	Mon Feb 25 10:49:20 2002 +0000
@@ -315,7 +315,8 @@
        (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)