[Geiser-users] [PATCH] Disable error in `define-syntax-rule' font lock

[Diogo F. S. Ramos]

This allows partially matched `define-syntax-rule' expressions and
avoids the termination of search-based fontification, which affects
other expressions inside the buffer, in the case of a missing
subexpression.
---
 elisp/geiser-syntax.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/elisp/geiser-syntax.el b/elisp/geiser-syntax.el
index 9aa02fc..94f7d55 100644
--- a/elisp/geiser-syntax.el
+++ b/elisp/geiser-syntax.el
@@ -57,7 +57,7 @@
     (,(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 nil t))))
 
 (font-lock-add-keywords 'scheme-mode geiser-syntax--keywords)
 
-- 
1.9.0