]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix cursor at bottom left of rectangle (bug#24364)
authorAlan Third <alan@idiocy.org>
Sun, 4 Sep 2016 21:58:37 +0000 (22:58 +0100)
committerAlan Third <alan@idiocy.org>
Wed, 19 Oct 2016 11:37:50 +0000 (12:37 +0100)
* lisp/rect.el (rectangle--col-pos): Don't assume point at EOL doesn't
require rectangle--point-crutches to be set.

lisp/rect.el

index 70a542d672462425c659d399b60b24ae3ed228cc..c0031642e0c0a985d4193fe87b1a9729acd6be1a 100644 (file)
@@ -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))