(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.

diff --git a/lisp/indent.el b/lisp/indent.el
index db8958bd1ca5faae9fabe82aa87679360f127540..77354444cfa025d7554af2da502ef5382562fd1f 100644 (file)
--- a/lisp/indent.el
+++ b/lisp/indent.el
@@ -86,10 +86,10 @@ If `transient-mark-mode' is turned on the region is active,
 indent the region.
 The function actually called to indent the line is determined by the value of
 `indent-line-function'."
-  (interactive "P")
+  (interactive "p")
   (cond
    ;; The region is active, indent it.
-   ((and transient-mark-mode mark-active
+   ((and arg transient-mark-mode mark-active
         (not (eq (region-beginning) (region-end))))
     (indent-region (region-beginning) (region-end)))
    ((or ;; indent-to-left-margin is only meant for indenting,