aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/rect.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/rect.el b/lisp/rect.el
index 70a542d6724..c0031642e0c 100644
--- a/lisp/rect.el
+++ b/lisp/rect.el
@@ -108,7 +108,7 @@ Point is at the end of the segment of this line within the rectangle."
108 108
109(defun rectangle--col-pos (col kind) 109(defun rectangle--col-pos (col kind)
110 (let ((c (move-to-column col))) 110 (let ((c (move-to-column col)))
111 (if (= c col) 111 (if (and (= c col) (not (eolp)))
112 (if (eq kind 'point) 112 (if (eq kind 'point)
113 (if (window-parameter nil 'rectangle--point-crutches) 113 (if (window-parameter nil 'rectangle--point-crutches)
114 (setf (window-parameter nil 'rectangle--point-crutches) nil)) 114 (setf (window-parameter nil 'rectangle--point-crutches) nil))