awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-03 12:27:26 -05:00
Code Issues Packages Projects Releases Wiki Activity

elisp: improve special fontification regexps

Browse Source
This commit is contained in:
Henrik Lissner
2016-05-21 23:08:29 -04:00
parent 77266a136b
commit 2fa7504d3c
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
modules/module-lisp.el
View File

@ -31,7 +31,7 @@
(font-lock-add-keywords (font-lock-add-keywords
nil `(("(\\(lambda\\)" (1 (doom/show-as ?λ))) nil `(("(\\(lambda\\)" (1 (doom/show-as ?λ)))
("(\\(doom\\)\\(-[^) ]+\\)?)" (0 font-lock-keyword-face append)) ("(\\(\\(doom\\)\\(-[^) ]*\\)?\\)[) ]" (1 font-lock-builtin-face))
;; Highlight doom macros (macros are fontified in emacs 25+) ;; Highlight doom macros (macros are fontified in emacs 25+)
(,(concat (,(concat
"(\\(def-" "(\\(def-"
@ -43,9 +43,9 @@
(1 font-lock-keyword-face append)) (1 font-lock-keyword-face append))
(,(concat (,(concat
"(\\(" "(\\("
(regexp-opt '("λ" "in" "map" "after" "shut-up" "add-hook" (regexp-opt '("λ" "in" "map" "after" "shut-up" "add-hook"
"associate" "define-org-link" "ex" "associate" "define-org-link" "ex"
"define-org-section")) "define-org-section" "set"))
"!\\)") "!\\)")
(1 font-lock-keyword-face append)) (1 font-lock-keyword-face append))
;; Ert ;; Ert