summaryrefslogtreecommitdiff
path: root/lisp/indent.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/indent.el')
-rw-r--r--lisp/indent.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/indent.el b/lisp/indent.el
index 47ef23d4aa3..19786237d6d 100644
--- a/lisp/indent.el
+++ b/lisp/indent.el
@@ -82,6 +82,9 @@ only if necessary. It leaves point at end of indentation."
(back-to-indentation)
(let ((cur-col (current-column)))
(cond ((< cur-col column)
+ (if (> (- column (* (/ cur-col tab-width) tab-width)) tab-width)
+ (delete-region (point)
+ (progn (skip-chars-backward " ") (point))))
(indent-to column))
((> cur-col column) ; too far right (after tab?)
(delete-region (progn (move-to-column column t) (point))