From e3df6b5cf259a38bb2c0188cc70c7ca0f8e957eb Mon Sep 17 00:00:00 2001
From: Artur Malabarba <bruce.connor.am@gmail.com>
Date: Thu, 26 May 2016 21:49:56 -0300
Subject: [PATCH] Fix #49 - Don't vanish the beacon due to changes in the Echo
 Area

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

diff --git a/beacon.el b/beacon.el
index 8126c4344..6b71ee0b2 100644
--- a/beacon.el
+++ b/beacon.el
@@ -242,10 +242,12 @@ COLORS applied to each one."
 
 (defun beacon--vanish (&rest _)
   "Turn off the beacon."
-  (when (timerp beacon--timer)
-    (cancel-timer beacon--timer))
-  (mapc #'delete-overlay beacon--ovs)
-  (setq beacon--ovs nil))
+  (unless (string-match "\\` \\*\\(temp-buffer\\|Echo Area.*\\)\\*"
+                        (buffer-name))
+    (when (timerp beacon--timer)
+      (cancel-timer beacon--timer))
+    (mapc #'delete-overlay beacon--ovs)
+    (setq beacon--ovs nil)))
 
 
 ;;; Colors
-- 
2.39.2