diff options
| author | Gerd Moellmann | 2001-04-10 14:16:51 +0000 |
|---|---|---|
| committer | Gerd Moellmann | 2001-04-10 14:16:51 +0000 |
| commit | cf8b1befd0304b62d080e3992902298d8b29bf2f (patch) | |
| tree | b0fca1fe7ea0cc74af613efa3a6bc2c4fab2516b | |
| parent | bbf63a7b7538c17a7016b6537d26f7546bae837f (diff) | |
| download | emacs-cf8b1befd0304b62d080e3992902298d8b29bf2f.tar.gz emacs-cf8b1befd0304b62d080e3992902298d8b29bf2f.zip | |
(sh-indent-line): Add optional PREFIX-ARG
parameter.
| -rw-r--r-- | lisp/ChangeLog | 3 | ||||
| -rw-r--r-- | lisp/progmodes/sh-script.el | 5 |
2 files changed, 6 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index acf28f730f7..4089614bebc 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,8 @@ | |||
| 1 | 2001-04-10 Gerd Moellmann <gerd@gnu.org> | 1 | 2001-04-10 Gerd Moellmann <gerd@gnu.org> |
| 2 | 2 | ||
| 3 | * progmodes/sh-script.el (sh-indent-line): Add optional PREFIX-ARG | ||
| 4 | parameter. | ||
| 5 | |||
| 3 | * faces.el (menu): Doc fix. | 6 | * faces.el (menu): Doc fix. |
| 4 | 7 | ||
| 5 | 2001-04-10 Vinicius Jose Latorre <vinicius@cpqd.com.br> | 8 | 2001-04-10 Vinicius Jose Latorre <vinicius@cpqd.com.br> |
diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el index c5339ac45f2..21a717c3863 100644 --- a/lisp/progmodes/sh-script.el +++ b/lisp/progmodes/sh-script.el | |||
| @@ -1,6 +1,7 @@ | |||
| 1 | ;;; sh-script.el --- shell-script editing commands for Emacs | 1 | ;;; sh-script.el --- shell-script editing commands for Emacs |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1993, 94, 95, 96, 97, 1999 by Free Software Foundation, Inc. | 3 | ;; Copyright (C) 1993, 94, 95, 96, 97, 1999, 2001 |
| 4 | ;; Free Software Foundation, Inc. | ||
| 4 | 5 | ||
| 5 | ;; Author: Daniel Pfeiffer <occitan@esperanto.org> | 6 | ;; Author: Daniel Pfeiffer <occitan@esperanto.org> |
| 6 | ;; Version: 2.0f | 7 | ;; Version: 2.0f |
| @@ -2437,7 +2438,7 @@ If INFO is supplied it is used, else it is calculated from current line." | |||
| 2437 | nil))))) | 2438 | nil))))) |
| 2438 | 2439 | ||
| 2439 | 2440 | ||
| 2440 | (defun sh-indent-line () | 2441 | (defun sh-indent-line (&optional prefix-arg) |
| 2441 | "Indent the current line." | 2442 | "Indent the current line." |
| 2442 | (interactive) | 2443 | (interactive) |
| 2443 | (sh-must-be-shell-mode) | 2444 | (sh-must-be-shell-mode) |