diff options
| author | Alan Third <alan@idiocy.org> | 2016-09-04 22:58:37 +0100 |
|---|---|---|
| committer | Alan Third <alan@idiocy.org> | 2016-10-19 12:37:50 +0100 |
| commit | dfd047666bcb2179652aee80248471a6efec06fc (patch) | |
| tree | a68165849cb688c596e6f10ff4561588349de6af | |
| parent | 8ad0d7da0a84750e1884a89a212963f81ae26816 (diff) | |
| download | emacs-dfd047666bcb2179652aee80248471a6efec06fc.tar.gz | |
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.el | 2 |
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." (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)) |