diff options
| -rw-r--r-- | lisp/emulation/cua-rect.el | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/lisp/emulation/cua-rect.el b/lisp/emulation/cua-rect.el index 3270b7fd62c..10d369fa042 100644 --- a/lisp/emulation/cua-rect.el +++ b/lisp/emulation/cua-rect.el @@ -778,7 +778,6 @@ If command is repeated at same position, delete the rectangle." '(lambda (s e l r v) (let ((rface (if v 'cua-rectangle-face 'cua-rectangle-noselect-face)) overlay bs ms as) - (if (= s e) (setq e (1+ e))) (when (cua--rectangle-virtual-edges) (let ((lb (line-beginning-position)) (le (line-end-position)) |