summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAlan Third <alan@idiocy.org>2016-09-04 22:58:37 +0100
committerAlan Third <alan@idiocy.org>2016-09-07 22:29:14 +0100
commit3b3bc36b0d0b273534cf08a51d6a10c015875e2c (patch)
tree644cf93f0c44ac7811ffb8f7f4bba14bebd7676c
parentec12c6705f91106c4f4c53e76447dafa21e12f9f (diff)
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.
-rw-r--r--lisp/rect.el2
1 files changed, 1 insertions, 1 deletions
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))