Highlight `when' like `if'.
---
 elisp/geiser-syntax.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/elisp/geiser-syntax.el b/elisp/geiser-syntax.el
index 9aa02fc..b32c0c7 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))))
+      (2 font-lock-function-name-face))
+    (,(rx "(" (group "when") eow) . 1)))
 
 (font-lock-add-keywords 'scheme-mode geiser-syntax--keywords)
 
-- 
1.9.0


Reply via email to