diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2014-03-07 13:25:02 +0100 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2014-03-07 13:25:02 +0100 |
| commit | 121434ea1e956f8abab688a472f2a9c5524e934b (patch) | |
| tree | 9cb61d20b2fe58ef08bd8f1449644679cda60b31 /elisp/geiser-syntax.el | |
| parent | 90bb87cf31a3f22d3485aec2b6d182db672937e9 (diff) | |
| download | geiser-121434ea1e956f8abab688a472f2a9c5524e934b.tar.gz geiser-121434ea1e956f8abab688a472f2a9c5524e934b.tar.bz2 | |
Fontify when too (thanks to Diogo)
Diffstat (limited to 'elisp/geiser-syntax.el')
| -rw-r--r-- | elisp/geiser-syntax.el | 3 |
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) |