branch: master
commit a7d482b610d3a499c2335ad89d44775be55bfa45
Author: Artur Malabarba <[email protected]>
Commit: Artur Malabarba <[email protected]>
Demote `beacon-dont-blink-predicates' to a defvar
Hooks make for lousy custom variables.
---
beacon.el | 7 +++----
1 files changed, 3 insertions(+), 4 deletions(-)
diff --git a/beacon.el b/beacon.el
index afbe144..4c57403 100644
--- a/beacon.el
+++ b/beacon.el
@@ -96,7 +96,7 @@ If it is a string, it is a color name or specification,
e.g. \"#666600\"."
:type '(choice number color))
-(defcustom beacon-dont-blink-predicates nil
+(defvar beacon-dont-blink-predicates nil
"A list of predicates that prevent the beacon blink.
These predicate functions are called in order, with no
arguments, before blinking the beacon. If any returns
@@ -105,9 +105,8 @@ non-nil, the beacon will not blink.
For instance, if you want to disable beacon on buffers where
`hl-line-mode' is on, you can do:
- (add-hook 'beacon-dont-blink-predicates
- (lambda () (bound-and-true-p hl-line-mode)))"
- :type 'hook)
+ (add-hook \\='beacon-dont-blink-predicates
+ (lambda () (bound-and-true-p hl-line-mode)))")
(add-hook 'beacon-dont-blink-predicates #'window-minibuffer-p)