From f28564957e495d953e729987bfdd96dc1c709646 Mon Sep 17 00:00:00 2001 From: "Kim F. Storm" Date: Mon, 1 Aug 2005 22:06:42 +0000 Subject: [PATCH] (cua--highlight-rectangle): Only show rectangle overlay in selected window. --- lisp/emulation/cua-rect.el | 1 + 1 file changed, 1 insertion(+) diff --git a/lisp/emulation/cua-rect.el b/lisp/emulation/cua-rect.el index baa61fcb395..d83ebd543cd 100644 --- a/lisp/emulation/cua-rect.el +++ b/lisp/emulation/cua-rect.el @@ -833,6 +833,7 @@ If command is repeated at same position, delete the rectangle." (overlay-put overlay 'after-string as) (overlay-put overlay 'face rface) (overlay-put overlay 'keymap cua--overlay-keymap) + (overlay-put overlay 'window (selected-window)) (setq new (cons overlay new)))))) ;; Trim old trailing overlays. (mapcar (function delete-overlay) old) -- 2.39.5