From: Karl Heuer Date: Fri, 14 Mar 1997 16:35:03 +0000 (+0000) Subject: (indent-line-to): Fix off-by-one bug when deciding X-Git-Tag: emacs-20.1~2790 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cd6d305e531906764ed2660f0d1762907025d51b;p=emacs.git (indent-line-to): Fix off-by-one bug when deciding whether to delete the existing spaces. --- 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))