diff options
| author | Juri Linkov <juri@jurta.org> | 2014-01-20 10:45:56 +0200 |
|---|---|---|
| committer | Juri Linkov <juri@jurta.org> | 2014-01-20 10:45:56 +0200 |
| commit | 3c5a4839a1e4751d1df8cec1b4e0b6b559d31070 (patch) | |
| tree | 6523a4076f88f13651abd28b53b31721cd57f586 /lisp/indent.el | |
| parent | 21cf45454596d1ceccce116eec7112e61446c65d (diff) | |
| download | emacs-3c5a4839a1e4751d1df8cec1b4e0b6b559d31070.tar.gz | |
* lisp/indent.el (indent-line-to): Use backward-to-indentation
instead of back-to-indentation.
Fixes: debbugs:16461
Diffstat (limited to 'lisp/indent.el')
| -rw-r--r-- | lisp/indent.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/indent.el b/lisp/indent.el index 4b51cf04ad1..ca221530458 100644 --- a/lisp/indent.el +++ b/lisp/indent.el @@ -265,7 +265,7 @@ indentation by specifying a large negative ARG." "Indent current line to COLUMN. This function removes or adds spaces and tabs at beginning of line only if necessary. It leaves point at end of indentation." - (back-to-indentation) + (backward-to-indentation 0) (let ((cur-col (current-column))) (cond ((< cur-col column) (if (>= (- column (* (/ cur-col tab-width) tab-width)) tab-width) @@ -274,7 +274,7 @@ only if necessary. It leaves point at end of indentation." (indent-to column)) ((> cur-col column) ; too far right (after tab?) (delete-region (progn (move-to-column column t) (point)) - (progn (back-to-indentation) (point))))))) + (progn (backward-to-indentation 0) (point))))))) (defun current-left-margin () "Return the left margin to use for this line. |