Mercurial > emacs

changeset 13035:b8453eab5114

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(indent-for-tab-command): Get the prefix arg and pass it along to indent-line-function if it isn't nil.
author Richard M. Stallman <rms@gnu.org>
date Thu, 14 Sep 1995 14:45:02 +0000
parents 1f9b08a989ea
children cd0e7903d0a9
files lisp/indent.el
diffstat 1 files changed, 5 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/indent.el	Thu Sep 14 07:23:43 1995 +0000
+++ b/lisp/indent.el	Thu Sep 14 14:45:02 1995 +0000
@@ -38,12 +38,14 @@
   (interactive)
   (funcall indent-line-function))
 
-(defun indent-for-tab-command ()
+(defun indent-for-tab-command (&optional prefix-arg)
   "Indent line in proper way for current major mode."
-  (interactive)
+  (interactive "P")
   (if (eq indent-line-function 'indent-to-left-margin)
       (insert-tab)
-    (funcall indent-line-function)))
+    (if prefix-arg
+	(funcall indent-line-function prefix-arg)
+      (funcall indent-line-function))))
 
 (defun insert-tab ()
   (if abbrev-mode