branch: elpa/symbol-overlay
commit 50a2bd64800a11d3418d89321a3d19c5acd1c70f
Merge: 8b8888c8b2 213629dc13
Author: wolray <[email protected]>
Commit: GitHub <[email protected]>
Merge pull request #47 from langston-barrett/master
Add a hook for when overlays are created
---
symbol-overlay.el | 9 ++++++++-
1 file changed, 8 insertions(+), 1 deletion(-)
diff --git a/symbol-overlay.el b/symbol-overlay.el
index f6eaff1143..8c6c40c6bb 100644
--- a/symbol-overlay.el
+++ b/symbol-overlay.el
@@ -156,6 +156,11 @@
:group 'symbol-overlay
:type 'float)
+(defcustom symbol-overlay-overlay-created-functions '()
+ "Functions called after overlay creation that may modify the overlay."
+ :group 'symbol-overlay
+ :type 'hook)
+
(defcustom symbol-overlay-ignore-functions
'((c-mode . symbol-overlay-ignore-function-c)
(c++-mode . symbol-overlay-ignore-function-c++)
@@ -342,7 +347,9 @@ Otherwise apply `symbol-overlay-default-face'."
(overlay-put ov 'evaporate t)
(overlay-put ov 'symbol symbol))
(overlay-put ov 'face 'symbol-overlay-default-face)
- (overlay-put ov 'symbol ""))))
+ (overlay-put ov 'symbol ""))
+ (dolist (fun symbol-overlay-overlay-created-functions)
+ (funcall fun ov))))
(defun symbol-overlay-put-all (symbol scope &optional keyword)
"Put overlays on all occurrences of SYMBOL in the buffer.
