branch: master
commit b245dbe9f18d38f67385c1986c255aac854ef9c8
Merge: b783daa aaeb619
Author: Artur Malabarba <bruce.connor...@gmail.com>
Commit: Artur Malabarba <bruce.connor...@gmail.com>
Merge commit 'aaeb619f1ff57e666925bcef22bb3195c22d589e'
---
packages/beacon/beacon.el | 12 +++++++-----
1 file changed, 7 insertions(+), 5 deletions(-)
diff --git a/packages/beacon/beacon.el b/packages/beacon/beacon.el
index 8126c43..9a3edac 100644
--- a/packages/beacon/beacon.el
+++ b/packages/beacon/beacon.el
@@ -5,7 +5,7 @@
;; Author: Artur Malabarba <em...@endlessparentheses.com>
;; URL: https://github.com/Malabarba/beacon
;; Keywords: convenience
-;; Version: 1.3.0
+;; Version: 1.3.1
;; Package-Requires: ((seq "2.14"))
;; This program is free software; you can redistribute it and/or modify
@@ -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
