From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 15 Apr 1996 21:17:59 +0000 (+0000)
Subject: (sh-while-getopts): Punctuate help message better.
X-Git-Tag: emacs-19.34~834
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c898fb2821fde0faa18488405fcce4da1a2a8a58;p=emacs.git

(sh-while-getopts): Punctuate help message better.
---

diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el
index 0a7b387d06f..51923ee2795 100644
--- a/lisp/progmodes/sh-script.el
+++ b/lisp/progmodes/sh-script.el
@@ -1297,12 +1297,12 @@ option followed by a colon `:' if the option accepts an argument."
 	";;" \n)
       < "*)" \n
       > "echo" " \"usage: " "`basename $0`"
-      "[ +-" '(setq v1 (point)) str
+      " [+-" '(setq v1 (point)) str
       '(save-excursion
 	 (while (search-backward ":" v1 t)
-	   (replace-match " arg][ +-" t t)))
+	   (replace-match " ARG] [+-" t t)))
       (if (eq (preceding-char) ?-) -5)
-      "][ --] args\"" \n
+      "] [--] ARGS...\"" \n
       "exit 2" \n
       < < "esac" \n
       < "done" \n