branch: master commit e3df6b5cf259a38bb2c0188cc70c7ca0f8e957eb Author: Artur Malabarba <bruce.connor...@gmail.com> Commit: Artur Malabarba <bruce.connor...@gmail.com>
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 8126c43..6b71ee0 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