diff options
| author | Juri Linkov | 2007-10-18 00:08:08 +0000 |
|---|---|---|
| committer | Juri Linkov | 2007-10-18 00:08:08 +0000 |
| commit | bc3214eda6c4c4e9fb64fd75a4d492f500367490 (patch) | |
| tree | 2f1bd7c7c802185b1a3962e4773a03b5db2fd866 | |
| parent | 69f5930ae5ef109229ca5702b43abd646faf7f37 (diff) | |
| download | emacs-bc3214eda6c4c4e9fb64fd75a4d492f500367490.tar.gz emacs-bc3214eda6c4c4e9fb64fd75a4d492f500367490.zip | |
(indent-for-tab-command): Change interactive spec from "P" to "p".
(indent-for-tab-command): Add check for interactive arg before
indenting the active region.
| -rw-r--r-- | lisp/indent.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/indent.el b/lisp/indent.el index db8958bd1ca..77354444cfa 100644 --- a/lisp/indent.el +++ b/lisp/indent.el | |||
| @@ -86,10 +86,10 @@ If `transient-mark-mode' is turned on the region is active, | |||
| 86 | indent the region. | 86 | indent the region. |
| 87 | The function actually called to indent the line is determined by the value of | 87 | The function actually called to indent the line is determined by the value of |
| 88 | `indent-line-function'." | 88 | `indent-line-function'." |
| 89 | (interactive "P") | 89 | (interactive "p") |
| 90 | (cond | 90 | (cond |
| 91 | ;; The region is active, indent it. | 91 | ;; The region is active, indent it. |
| 92 | ((and transient-mark-mode mark-active | 92 | ((and arg transient-mark-mode mark-active |
| 93 | (not (eq (region-beginning) (region-end)))) | 93 | (not (eq (region-beginning) (region-end)))) |
| 94 | (indent-region (region-beginning) (region-end))) | 94 | (indent-region (region-beginning) (region-end))) |
| 95 | ((or ;; indent-to-left-margin is only meant for indenting, | 95 | ((or ;; indent-to-left-margin is only meant for indenting, |