summaryrefslogtreecommitdiff
path: root/lisp/indent.el
diff options
context:
space:
mode:
authorKarl Heuer <kwzh@gnu.org>1997-03-14 16:35:03 +0000
committerKarl Heuer <kwzh@gnu.org>1997-03-14 16:35:03 +0000
commitcd6d305e531906764ed2660f0d1762907025d51b (patch)
tree05e84a9b1cdceb2aba4e6e051fa389d3d596f716 /lisp/indent.el
parent3ec18f3f45bdacf82fcd17e6925872bd93799f9b (diff)
downloademacs-cd6d305e531906764ed2660f0d1762907025d51b.tar.gz
(indent-line-to): Fix off-by-one bug when deciding
whether to delete the existing spaces.
Diffstat (limited to 'lisp/indent.el')
-rw-r--r--lisp/indent.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/indent.el b/lisp/indent.el
index c1e2fc2e132..5b69fab958a 100644
--- a/lisp/indent.el
+++ b/lisp/indent.el
@@ -84,7 +84,7 @@ 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)
+ (if (>= (- column (* (/ cur-col tab-width) tab-width)) tab-width)
(delete-region (point)
(progn (skip-chars-backward " ") (point))))
(indent-to column))