branch: elpa/symbol-overlay
commit de2bf06202f4984662089900733facf145c3956e
Author: Steve Purcell <[email protected]>
Commit: Steve Purcell <[email protected]>
Turn overlay colors list and idle time into custom vars
---
symbol-overlay.el | 23 ++++++++++++-----------
1 file changed, 12 insertions(+), 11 deletions(-)
diff --git a/symbol-overlay.el b/symbol-overlay.el
index 9a48717fed..e6b7716be2 100644
--- a/symbol-overlay.el
+++ b/symbol-overlay.el
@@ -102,17 +102,21 @@ You can re-bind the commands to any keys you prefer.")
(defvar-local symbol-overlay-keywords-alist nil)
-(defvar symbol-overlay-colors '("dodger blue"
- "hot pink"
- "orange"
- "orchid"
- "red"
- "salmon"
- "spring green"
- "turquoise")
+(defcustom symbol-overlay-colors '("dodger blue"
+ "hot pink"
+ "orange"
+ "orchid"
+ "red"
+ "salmon"
+ "spring green"
+ "turquoise")
"Colors used for overlays' background.
You can add more colors whatever you like.")
+(defcustom symbol-overlay-idle-time 0.5
+ "Idle time after every command and before the temporary highlighting."
+ :type 'float)
+
(defun symbol-overlay-get-list (&optional symbol car-or-cdr exclude)
"Get all highlighted overlays in the buffer.
If SYMBOL is non-nil, get the overlays that belong to it.
@@ -217,9 +221,6 @@ This only effects symbols in the current displayed window."
(defvar symbol-overlay-timer nil
"Timer for temporary highlighting.")
-(defvar symbol-overlay-idle-time 0.5
- "Idle time after every command and before the temporary highlighting.")
-
(defun symbol-overlay-update-timer (value)
"Update `symbol-overlay-timer' with new idle-time VALUE."
(and symbol-overlay-timer (cancel-timer symbol-overlay-timer))