From 5e0cb17badf165d1e21aebbdefb478301a1dc00d Mon Sep 17 00:00:00 2001 From: "Kim F. Storm" Date: Wed, 8 Sep 2004 13:07:50 +0000 Subject: [PATCH] (cua--highlight-rectangle): Fix last change. Use zero width overlays when necessary. --- lisp/emulation/cua-rect.el | 1 - 1 file changed, 1 deletion(-) 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)) -- 2.39.5