From 3b3bc36b0d0b273534cf08a51d6a10c015875e2c Mon Sep 17 00:00:00 2001 From: Alan Third Date: Sun, 4 Sep 2016 22:58:37 +0100 Subject: Fix cursor at bottom left of rectangle (bug#24364) * lisp/rect.el (rectangle--col-pos): Don't assume point at EOL doesn't require rectangle--point-crutches to be set. --- lisp/rect.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/rect.el b/lisp/rect.el index 13499d686f..f9bebc47fe 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." (defun rectangle--col-pos (col kind) (let ((c (move-to-column col))) - (if (= c col) + (if (and (= c col) (not (eolp))) (if (eq kind 'point) (if (window-parameter nil 'rectangle--point-crutches) (setf (window-parameter nil 'rectangle--point-crutches) nil)) -- cgit v1.2.3