# HG changeset patch # User Gerd Moellmann # Date 987525190 0 # Node ID 160182fbcbbf3e3ca003edc018a93bc8865cf086 # Parent 0bef27649ba523f86274c26142c907eaad8e7af5 (indent-for-tab-command): Call indent-line-function with no argument if PREFIX-ARG is non-nil. diff -r 0bef27649ba5 -r 160182fbcbbf lisp/indent.el --- a/lisp/indent.el Tue Apr 17 16:20:33 2001 +0000 +++ b/lisp/indent.el Tue Apr 17 16:33:10 2001 +0000 @@ -1,6 +1,6 @@ ;;; indent.el --- indentation commands for Emacs -;; Copyright (C) 1985, 1995 Free Software Foundation, Inc. +;; Copyright (C) 1985, 1995, 2001 Free Software Foundation, Inc. ;; Maintainer: FSF @@ -65,9 +65,7 @@ (and (not tab-always-indent) (> (current-column) (current-indentation)))) (insert-tab prefix-arg) - (if prefix-arg - (funcall indent-line-function prefix-arg) - (funcall indent-line-function)))) + (funcall indent-line-function))) (defun insert-tab (&optional prefix-arg) (let ((count (prefix-numeric-value prefix-arg)))