From: Alan Third <alan@idiocy.org>
Date: Sun, 4 Sep 2016 21:58:37 +0000 (+0100)
Subject: Fix cursor at bottom left of rectangle (bug#24364)
X-Git-Tag: emacs-25.1.90~104
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dfd047666bcb2179652aee80248471a6efec06fc;p=emacs.git

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.
---

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."
 
 (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))