[elpa] master e2fb73d 3/3: Merge commit '16be7a12d0dbbbd0e59fc2ccf9a7c7085eb9cf5a'

[Artur Malabarba]

branch: master
commit e2fb73d2f8fff2e604e9d59f55f7275e8999b04b
Merge: 22e3257 16be7a1
Author: Artur Malabarba <address@hidden>
Commit: Artur Malabarba <address@hidden>

    Merge commit '16be7a12d0dbbbd0e59fc2ccf9a7c7085eb9cf5a'
---
 packages/beacon/beacon.el |    7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/packages/beacon/beacon.el b/packages/beacon/beacon.el
index 6c35e2b..8126c43 100644
--- a/packages/beacon/beacon.el
+++ b/packages/beacon/beacon.el
@@ -5,7 +5,7 @@
 ;; Author: Artur Malabarba <address@hidden>
 ;; URL: https://github.com/Malabarba/beacon
 ;; Keywords: convenience
-;; Version: 1.2.1
+;; Version: 1.3.0
 ;; Package-Requires: ((seq "2.14"))
 
 ;; This program is free software; you can redistribute it and/or modify
@@ -166,6 +166,10 @@ predictable ways, when the blink would be more distracting
 than helpful.."
   :type '(repeat symbol))
 
+(defcustom beacon-before-blink-hook nil
+  "Hook run immediately before blinking the beacon."
+  :type 'hook)
+
 
 ;;; Internal variables
 (defvar beacon--window-scrolled nil)
@@ -321,6 +325,7 @@ unconditionally (even if `beacon-mode' is disabled), and 
this can
 be invoked as a user command or called from lisp code."
   (interactive)
   (beacon--vanish)
+  (run-hooks 'beacon-before-blink-hook)
   (beacon--shine)
   (setq beacon--timer
         (run-at-time beacon-blink-delay