From 6f647f60c5b289cb593de779c9ee79ff88089a89 Mon Sep 17 00:00:00 2001
From: Artur Malabarba <bruce.connor.am@gmail.com>
Date: Thu, 15 Oct 2015 14:33:39 +0100
Subject: [PATCH] Only blink selected window

---
 beacon.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/beacon.el b/beacon.el
index ba47f18ea..149f6fbc7 100644
--- a/beacon.el
+++ b/beacon.el
@@ -243,9 +243,9 @@ If DELTA is nil, return nil."
         (beacon-blink))))
    ;; Blink for scrolling.
    ((and beacon-blink-when-window-scrolls
-         beacon--window-scrolled)
-    (with-selected-window beacon--window-scrolled
-      (beacon-blink))
+         beacon--window-scrolled
+         (equal beacon--window-scrolled (selected-window)))
+    (beacon-blink)
     (setq beacon--window-scrolled nil))
    ;; Blink for movement
    ((beacon--movement-> beacon-blink-when-point-moves)
-- 
2.39.2