From: Karl Heuer <kwzh@gnu.org>
Date: Tue, 30 May 1995 23:06:00 +0000 (+0000)
Subject: (sh-mode-map): Fix capitalization in menu bar.
X-Git-Tag: emacs-19.34~3824
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=11b137a7435a62bc2c754cc87311aeb15eb8db0b;p=emacs.git

(sh-mode-map): Fix capitalization in menu bar.
---

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.")