aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorNoam Postavsky2017-05-11 21:06:33 -0400
committerNoam Postavsky2017-05-15 22:58:24 -0400
commit4635016869f7b85dfe37669674677a7dcaab20c4 (patch)
tree412879eead38b15a64f6139b31ba66a4efd71190
parent750f0e2e79e1bdc3246b07aa3219cab34ebde6e7 (diff)
downloademacs-4635016869f7b85dfe37669674677a7dcaab20c4.tar.gz
emacs-4635016869f7b85dfe37669674677a7dcaab20c4.zip
Make `indent-line-to' respect field boundaries (Bug#26891)
* lisp/indent.el (indent-line-to): Use `back-to-indentation' instead of `backward-to-indentation'.
-rw-r--r--lisp/indent.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/indent.el b/lisp/indent.el
index fdd184c7998..e7a30b885d7 100644
--- a/lisp/indent.el
+++ b/lisp/indent.el
@@ -285,7 +285,7 @@ indentation by specifying a large negative ARG."
285 "Indent current line to COLUMN. 285 "Indent current line to COLUMN.
286This function removes or adds spaces and tabs at beginning of line 286This function removes or adds spaces and tabs at beginning of line
287only if necessary. It leaves point at end of indentation." 287only if necessary. It leaves point at end of indentation."
288 (backward-to-indentation 0) 288 (back-to-indentation)
289 (let ((cur-col (current-column))) 289 (let ((cur-col (current-column)))
290 (cond ((< cur-col column) 290 (cond ((< cur-col column)
291 (if (>= (- column (* (/ cur-col tab-width) tab-width)) tab-width) 291 (if (>= (- column (* (/ cur-col tab-width) tab-width)) tab-width)