diff options
-rw-r--r-- | lisp/simple.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 0b33a51b41c..dbb84633db8 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -4958,8 +4958,9 @@ also checks the value of `use-empty-active-region'." (mapc #'redisplay--update-region-highlight (delq nil (mapcar (lambda (w) - (and (eq w mark-active) - w)) + (when (or (eq mark-active t) + (eq mark-active w)) + w)) windows))) (let ((msw (and (window-minibuffer-p) (minibuffer-selected-window)))) (dolist (w windows) |