[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] scratch/highlight-n-windows 193183e: Check for mark-active
From: |
Oleh Krehel |
Subject: |
[Emacs-diffs] scratch/highlight-n-windows 193183e: Check for mark-active t in `redisplay--update-region-highlights' |
Date: |
Wed, 01 Apr 2015 07:05:23 +0000 |
branch: scratch/highlight-n-windows
commit 193183e28125b9aba51ea3676b899e72de33b54d
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>
Check for mark-active t in `redisplay--update-region-highlights'
* lisp/simple.el (redisplay--update-region-highlights): Revert to old
behavior when mark-active is t.
---
lisp/simple.el | 5 +++--
1 files changed, 3 insertions(+), 2 deletions(-)
diff --git a/lisp/simple.el b/lisp/simple.el
index 0b33a51..dbb8463 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)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] scratch/highlight-n-windows 193183e: Check for mark-active t in `redisplay--update-region-highlights',
Oleh Krehel <=