# HG changeset patch
# User Dan Nicolaescu <dann@ics.uci.edu>
# Date 1208018463 0
# Node ID 8208c3bf9e0d1243f287498f24afe6ccd8806933
# Parent  ac3873b5653af608fa1da19d34f9d629c6f5a560
(sh-show-indent): Fix typo.
(sh-mode-map): Add a toggle for inserting braces and quotes in pairs.

diff -r ac3873b5653a -r 8208c3bf9e0d lisp/ChangeLog
--- a/lisp/ChangeLog	Sat Apr 12 16:33:24 2008 +0000
+++ b/lisp/ChangeLog	Sat Apr 12 16:41:03 2008 +0000
@@ -1,5 +1,8 @@
 2008-04-12  Dan Nicolaescu  <dann@ics.uci.edu>
 
+	* progmodes/sh-script.el (sh-show-indent): Fix typo.
+	(sh-mode-map): Add a toggle for inserting braces and quotes in pairs.
+
 	* vc-cvs.el (vc-cvs-registered): Allow removed files to be
 	considered registered.
 
diff -r ac3873b5653a -r 8208c3bf9e0d lisp/progmodes/sh-script.el
--- a/lisp/progmodes/sh-script.el	Sat Apr 12 16:33:24 2008 +0000
+++ b/lisp/progmodes/sh-script.el	Sat Apr 12 16:41:03 2008 +0000
@@ -492,11 +492,16 @@
 		  :help "Learn how to indent a line as it currently is indented"))
     (define-key menu-map [sh-show-indent]
       '(menu-item "Show indentation" sh-show-indent
-		  :help "Show the how the currently line would be indented"))
+		  :help "Show the how the current line would be indented"))
     (define-key menu-map [sh-set-indent]
       '(menu-item "Set indentation" sh-set-indent
 		  :help "Set the indentation for the current line"))
 
+    (define-key menu-map [sh-pair]
+      '(menu-item "Insert braces and quotes in pairs" (lambda () (interactive) (setq skeleton-pair (not skeleton-pair)))
+		  :button (:toggle . skeleton-pair)
+		  :help "Inserting a brace or quote automatically inserts the matching pair"))
+
     (define-key menu-map [sh-s0] '("--"))
     ;; Insert
     (define-key menu-map [sh-function]
@@ -2776,7 +2781,7 @@
     (if msg (message "%s" msg) (message nil))))
 
 (defun sh-show-indent (arg)
-  "Show the how the currently line would be indented.
+  "Show the how the current line would be indented.
 This tells you which variable, if any, controls the indentation of
 this line.
 If optional arg ARG is non-null (called interactively with a prefix),