* lisp/indent.el (indent-line-to): Fix dedenting of tabs.

1 files changed, 5 insertions, 3 deletions

diff --git a/lisp/indent.el b/lisp/indent.el
index db811cf35cc..450632174fc 100644
--- a/lisp/indent.el
+++ b/lisp/indent.el
@@ -300,9 +300,11 @@ only if necessary.  It leaves point at end of indentation."
                               (progn (skip-chars-backward " ") (point))))
            (indent-to column))
           ((> cur-col column) ; too far right (after tab?)
-           (let ((cur-indent (point)))
-             (delete-region (progn (move-to-column column t) (point))
-                            cur-indent))))))
+           (delete-region (progn (move-to-column column t) (point))
+                          ;; The `move-to-column' call may replace
+                          ;; tabs with spaces, so we can't reuse the
+                          ;; previous `back-to-indentation' point.
+                          (progn (back-to-indentation) (point)))))))
 
 (defun current-left-margin ()
   "Return the left margin to use for this line.