diff options
| author | Richard M. Stallman | 1996-04-15 21:17:59 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1996-04-15 21:17:59 +0000 |
| commit | c898fb2821fde0faa18488405fcce4da1a2a8a58 (patch) | |
| tree | 6c43298d528b68a5744ab3ecb38f4d39640ed0ca /lisp/progmodes | |
| parent | bbcbfd687af997c9c3d3403a77192d7943857afb (diff) | |
| download | emacs-c898fb2821fde0faa18488405fcce4da1a2a8a58.tar.gz emacs-c898fb2821fde0faa18488405fcce4da1a2a8a58.zip | |
(sh-while-getopts): Punctuate help message better.
Diffstat (limited to 'lisp/progmodes')
| -rw-r--r-- | lisp/progmodes/sh-script.el | 6 |
1 files 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." | |||
| 1297 | ";;" \n) | 1297 | ";;" \n) |
| 1298 | < "*)" \n | 1298 | < "*)" \n |
| 1299 | > "echo" " \"usage: " "`basename $0`" | 1299 | > "echo" " \"usage: " "`basename $0`" |
| 1300 | "[ +-" '(setq v1 (point)) str | 1300 | " [+-" '(setq v1 (point)) str |
| 1301 | '(save-excursion | 1301 | '(save-excursion |
| 1302 | (while (search-backward ":" v1 t) | 1302 | (while (search-backward ":" v1 t) |
| 1303 | (replace-match " arg][ +-" t t))) | 1303 | (replace-match " ARG] [+-" t t))) |
| 1304 | (if (eq (preceding-char) ?-) -5) | 1304 | (if (eq (preceding-char) ?-) -5) |
| 1305 | "][ --] args\"" \n | 1305 | "] [--] ARGS...\"" \n |
| 1306 | "exit 2" \n | 1306 | "exit 2" \n |
| 1307 | < < "esac" \n | 1307 | < < "esac" \n |
| 1308 | < "done" \n | 1308 | < "done" \n |