diff options
| author | Karl Heuer <kwzh@gnu.org> | 1997-03-14 16:35:03 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1997-03-14 16:35:03 +0000 |
| commit | ac275bf03b5509e2885d2e7866cee607c7ea4013 (patch) | |
| tree | c131405986b1c43408cf35e07363a70b8f6019f1 | |
| parent | 7578d7edf2eecd8f47b9f10a460746e5925ec5f2 (diff) | |
| download | emacs-ac275bf03b5509e2885d2e7866cee607c7ea4013.tar.gz | |
(indent-line-to): Fix off-by-one bug when deciding
whether to delete the existing spaces.
| -rw-r--r-- | lisp/indent.el | 2 |
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)) |