]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix bug in "Options Loop" skeleton for ksh. Add newlines to a few skeletons,
authorJuanma Barranquero <lekktu@gmail.com>
Fri, 6 Jun 2003 15:06:53 +0000 (15:06 +0000)
committerJuanma Barranquero <lekktu@gmail.com>
Fri, 6 Jun 2003 15:06:53 +0000 (15:06 +0000)
add "select" keyword for bash.

lisp/progmodes/sh-script.el

index 49ca73a435cc4fd49cce3d28d4a715d34ea39e96..127799d9447e3317447938b27ef6b82d47ffd901 100644 (file)
@@ -654,7 +654,7 @@ flow of control or syntax.  See `sh-feature'."
 
 (defcustom sh-other-keywords
   '((bash eval sh-append bourne
-         "bye" "logout")
+         "bye" "logout" "select")
 
     ;; The next entry is only used for defining the others
     (bourne eval sh-append sh
@@ -3100,7 +3100,7 @@ This is always added to the end of the buffer."
       ( "pattern, %s: "
        > str sh-non-closing-paren \n
        > _ \n
-       ";;" \n)
+       ";;" \n \n)
       > "*" sh-non-closing-paren \n
       > _ \n
       resume:
@@ -3288,7 +3288,7 @@ t means to return a list of all possible completions of STRING.
       > _ \n
       ( "other condition, %s: "
        >  "elif " str "; then" > \n
-       > \n)
+       > \n \n)
       "else" > \n
       > \n
       resume:
@@ -3421,7 +3421,7 @@ option followed by a colon `:' if the option accepts an argument."
   (ksh88 eval sh-modify sh
         16 "print"
         18 "${0##*/}"
-        36 "OPTIND-1")
+        37 "OPTIND-1")
   (posix eval sh-modify sh
         18 "$(basename $0)")
   (sh "optstring: "
@@ -3436,7 +3436,7 @@ option followed by a colon `:' if the option accepts an argument."
                  v2 nil)))
        > str "|+" str sh-non-closing-paren \n
        > _ v2 \n
-       > ";;" \n)
+       > ";;" \n \n)
       > "*" sh-non-closing-paren \n
       > "echo" " \"usage: " "`basename $0`"
       " [+-" '(setq v1 (point)) str