From cd6d305e531906764ed2660f0d1762907025d51b Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Fri, 14 Mar 1997 16:35:03 +0000 Subject: [PATCH] (indent-line-to): Fix off-by-one bug when deciding whether to delete the existing spaces. --- lisp/indent.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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)) -- 2.39.5