branch: elpa/helm
commit 82d3e97ecdfb2f2e581ecc1299ef49c5431bea34
Author: Thierry Volpiatto <[email protected]>
Commit: Thierry Volpiatto <[email protected]>
Add extra fontification for helm-acase
---
helm-core.el | 4 ++++
1 file changed, 4 insertions(+)
diff --git a/helm-core.el b/helm-core.el
index ca7ea5863c2..3814c6af50b 100644
--- a/helm-core.el
+++ b/helm-core.el
@@ -34,6 +34,10 @@
(require 'helm-multi-match)
(require 'helm-source)
+(defun helm-acase-extra-fontifications ()
+ (font-lock-add-keywords nil '(("\\<\\(guard\\|dst\\)\\>\\*" .
font-lock-type-face))))
+(add-hook 'emacs-lisp-mode-hook #'helm-acase-extra-fontifications)
+
;; Setup completion styles for helm-mode
(helm--setup-completion-styles-alist)
