From 11b137a7435a62bc2c754cc87311aeb15eb8db0b Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Tue, 30 May 1995 23:06:00 +0000 Subject: [PATCH] (sh-mode-map): Fix capitalization in menu bar. --- lisp/progmodes/sh-script.el | 14 +++++++------- 1 file 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 @@ (define-key map [menu-bar insert] (cons "Insert" (make-sparse-keymap "Insert"))) (define-key map [menu-bar insert sh-while] - '("While loop" . sh-while)) + '("While Loop" . sh-while)) (define-key map [menu-bar insert sh-until] - '("Until loop" . sh-until)) + '("Until Loop" . sh-until)) (define-key map [menu-bar insert sh-select] - '("Select statement" . sh-select)) + '("Select Statement" . sh-select)) (define-key map [menu-bar insert sh-indexed-loop] - '("Indexed loop" . sh-indexed-loop)) + '("Indexed Loop" . sh-indexed-loop)) (define-key map [menu-bar insert sh-if] - '("If statement" . sh-if)) + '("If Statement" . sh-if)) (define-key map [menu-bar insert sh-for] - '("For loop" . sh-for)) + '("For Loop" . sh-for)) (define-key map [menu-bar insert sh-case] - '("Case statement" . sh-case)) + '("Case Statement" . sh-case)) map) "Keymap used in Shell-Script mode.") -- 2.39.2