# HG changeset patch # User Richard M. Stallman # Date 811089902 0 # Node ID b8453eab5114ac9cc026484fa230ef422895aae8 # Parent 1f9b08a989ea8b510c5013e7fb9b3204701144e1 (indent-for-tab-command): Get the prefix arg and pass it along to indent-line-function if it isn't nil. diff -r 1f9b08a989ea -r b8453eab5114 lisp/indent.el --- 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