diff options
| author | Karl Heuer | 1995-05-30 23:06:00 +0000 |
|---|---|---|
| committer | Karl Heuer | 1995-05-30 23:06:00 +0000 |
| commit | 11b137a7435a62bc2c754cc87311aeb15eb8db0b (patch) | |
| tree | 95fabe3f90f43ee634d279ff17b46e6f7792a098 | |
| parent | 0e520d74eb5256361ea4384c7b33a96be4c5e9f4 (diff) | |
| download | emacs-11b137a7435a62bc2c754cc87311aeb15eb8db0b.tar.gz emacs-11b137a7435a62bc2c754cc87311aeb15eb8db0b.zip | |
(sh-mode-map): Fix capitalization in menu bar.
| -rw-r--r-- | lisp/progmodes/sh-script.el | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el index c04a31607da..c590adb6491 100644 --- a/lisp/progmodes/sh-script.el +++ b/lisp/progmodes/sh-script.el | |||
| @@ -120,19 +120,19 @@ | |||
| 120 | (define-key map [menu-bar insert] | 120 | (define-key map [menu-bar insert] |
| 121 | (cons "Insert" (make-sparse-keymap "Insert"))) | 121 | (cons "Insert" (make-sparse-keymap "Insert"))) |
| 122 | (define-key map [menu-bar insert sh-while] | 122 | (define-key map [menu-bar insert sh-while] |
| 123 | '("While loop" . sh-while)) | 123 | '("While Loop" . sh-while)) |
| 124 | (define-key map [menu-bar insert sh-until] | 124 | (define-key map [menu-bar insert sh-until] |
| 125 | '("Until loop" . sh-until)) | 125 | '("Until Loop" . sh-until)) |
| 126 | (define-key map [menu-bar insert sh-select] | 126 | (define-key map [menu-bar insert sh-select] |
| 127 | '("Select statement" . sh-select)) | 127 | '("Select Statement" . sh-select)) |
| 128 | (define-key map [menu-bar insert sh-indexed-loop] | 128 | (define-key map [menu-bar insert sh-indexed-loop] |
| 129 | '("Indexed loop" . sh-indexed-loop)) | 129 | '("Indexed Loop" . sh-indexed-loop)) |
| 130 | (define-key map [menu-bar insert sh-if] | 130 | (define-key map [menu-bar insert sh-if] |
| 131 | '("If statement" . sh-if)) | 131 | '("If Statement" . sh-if)) |
| 132 | (define-key map [menu-bar insert sh-for] | 132 | (define-key map [menu-bar insert sh-for] |
| 133 | '("For loop" . sh-for)) | 133 | '("For Loop" . sh-for)) |
| 134 | (define-key map [menu-bar insert sh-case] | 134 | (define-key map [menu-bar insert sh-case] |
| 135 | '("Case statement" . sh-case)) | 135 | '("Case Statement" . sh-case)) |
| 136 | map) | 136 | map) |
| 137 | "Keymap used in Shell-Script mode.") | 137 | "Keymap used in Shell-Script mode.") |
| 138 | 138 | ||