From c898fb2821fde0faa18488405fcce4da1a2a8a58 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 15 Apr 1996 21:17:59 +0000 Subject: [PATCH] (sh-while-getopts): Punctuate help message better. --- lisp/progmodes/sh-script.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) 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 -- 2.39.2