Mercurial > emacs
comparison lisp/progmodes/sh-script.el @ 12034:639cd125eddb
(sh-mode-map): Fix capitalization in menu bar.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Tue, 30 May 1995 23:06:00 +0000 |
parents | 07dd35326963 |
children | 0f970ed476cb |
comparison
equal
deleted
inserted
replaced
12033:f7638ab47de7 | 12034:639cd125eddb |
---|---|
118 (substitute-key-definition 'manual-entry 'sh-manual-entry | 118 (substitute-key-definition 'manual-entry 'sh-manual-entry |
119 map (current-global-map)) | 119 map (current-global-map)) |
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 |
139 | 139 |
140 | 140 |