Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-06-14 12:31:25 +00:00
Code Issues Projects Releases Packages Wiki Activity

Check for mark-active t in `redisplay--update-region-highlights'

Browse source 
* lisp/simple.el (redisplay--update-region-highlights): Revert to old
  behavior when mark-active is t.
This commit is contained in:
Oleh Krehel 2015-04-01 08:58:48 +02:00
parent 6da5ca1f59
commit 193183e281
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/simple.el
View file

@ -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)