diff options
| author | Gerd Moellmann | 2001-04-17 16:33:10 +0000 |
|---|---|---|
| committer | Gerd Moellmann | 2001-04-17 16:33:10 +0000 |
| commit | 61294601ffb1c131a44ebcb98e039e0a3aec97de (patch) | |
| tree | f76d3b15615ecd9614356fec585a75b67f0849ba | |
| parent | c095a1dd1991456af6518742f781bfb237cb64ad (diff) | |
| download | emacs-61294601ffb1c131a44ebcb98e039e0a3aec97de.tar.gz emacs-61294601ffb1c131a44ebcb98e039e0a3aec97de.zip | |
(indent-for-tab-command): Call indent-line-function
with no argument if PREFIX-ARG is non-nil.
| -rw-r--r-- | lisp/indent.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/indent.el b/lisp/indent.el index 648d928a1f3..a558ff26d5b 100644 --- a/lisp/indent.el +++ b/lisp/indent.el | |||
| @@ -1,6 +1,6 @@ | |||
| 1 | ;;; indent.el --- indentation commands for Emacs | 1 | ;;; indent.el --- indentation commands for Emacs |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1985, 1995 Free Software Foundation, Inc. | 3 | ;; Copyright (C) 1985, 1995, 2001 Free Software Foundation, Inc. |
| 4 | 4 | ||
| 5 | ;; Maintainer: FSF | 5 | ;; Maintainer: FSF |
| 6 | 6 | ||
| @@ -65,9 +65,7 @@ The function actually called to indent is determined by the value of | |||
| 65 | (and (not tab-always-indent) | 65 | (and (not tab-always-indent) |
| 66 | (> (current-column) (current-indentation)))) | 66 | (> (current-column) (current-indentation)))) |
| 67 | (insert-tab prefix-arg) | 67 | (insert-tab prefix-arg) |
| 68 | (if prefix-arg | 68 | (funcall indent-line-function))) |
| 69 | (funcall indent-line-function prefix-arg) | ||
| 70 | (funcall indent-line-function)))) | ||
| 71 | 69 | ||
| 72 | (defun insert-tab (&optional prefix-arg) | 70 | (defun insert-tab (&optional prefix-arg) |
| 73 | (let ((count (prefix-numeric-value prefix-arg))) | 71 | (let ((count (prefix-numeric-value prefix-arg))) |