mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00
Code Issues Releases Activity

(indent-for-tab-command): Call indent-line-function

Browse Source 
with no argument if PREFIX-ARG is non-nil.
This commit is contained in:
Gerd Moellmann 2001-04-17 16:33:10 +00:00
parent c095a1dd19
commit 61294601ff
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/indent.el
View File

@ -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 @@ The function actually called to indent is determined by the value of
(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)))