changeset 17155:d8e2f7cfb2b7

(indent-line-to): Fix off-by-one bug when deciding whether to delete the existing spaces.
author Karl Heuer <kwzh@gnu.org>
date Fri, 14 Mar 1997 16:35:03 +0000
parents 01faa9b0043e
children 05385a7a18c9
files lisp/indent.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/indent.el	Wed Mar 12 20:03:49 1997 +0000
+++ b/lisp/indent.el	Fri Mar 14 16:35:03 1997 +0000
@@ -84,7 +84,7 @@
   (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))