summaryrefslogtreecommitdiff
path: root/elisp
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2014-03-07 13:25:02 +0100
committerJose Antonio Ortega Ruiz <jao@gnu.org>2014-03-07 13:25:02 +0100
commit13f2aa64d2bd61f1338073d913b354d88ae3e4c2 (patch)
tree017dce1006eb426d73a66225d9b4fea35fd22201 /elisp
parentaefaae3c8af9d31c12411073dba7749f194bd749 (diff)
downloadgeiser-chez-13f2aa64d2bd61f1338073d913b354d88ae3e4c2.tar.gz
geiser-chez-13f2aa64d2bd61f1338073d913b354d88ae3e4c2.tar.bz2
Fontify when too (thanks to Diogo)
Diffstat (limited to 'elisp')
-rw-r--r--elisp/geiser-syntax.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/elisp/geiser-syntax.el b/elisp/geiser-syntax.el
index 94f7d55..b9a7174 100644
--- a/elisp/geiser-syntax.el
+++ b/elisp/geiser-syntax.el
@@ -57,7 +57,8 @@
(,(rx "(" (group "define-syntax-rule") eow (* space)
(? "(") (? (group (1+ word))))
(1 font-lock-keyword-face)
- (2 font-lock-function-name-face nil t))))
+ (2 font-lock-function-name-face nil t))
+ (,(rx "(" (group "when") eow) . 1)))
(font-lock-add-keywords 'scheme-mode geiser-syntax--keywords)