summaryrefslogtreecommitdiff
path: root/lisp/indent.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/indent.el')
-rw-r--r--lisp/indent.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/indent.el b/lisp/indent.el
index 398585e1f90..db811cf35cc 100644
--- a/lisp/indent.el
+++ b/lisp/indent.el
@@ -300,8 +300,9 @@ 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?)
- (delete-region (progn (move-to-column column t) (point))
- (progn (backward-to-indentation 0) (point)))))))
+ (let ((cur-indent (point)))
+ (delete-region (progn (move-to-column column t) (point))
+ cur-indent))))))
(defun current-left-margin ()
"Return the left margin to use for this line.