summaryrefslogtreecommitdiff
path: root/elisp
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2014-02-25 00:48:28 +0100
committerJose Antonio Ortega Ruiz <jao@gnu.org>2014-02-25 00:48:28 +0100
commite279622a64a42aedfcc388ff4df45319f76f794d (patch)
tree3e397f5e6071613fe1abb5743881f4927440fe14 /elisp
parent5fddde9ef9dc53fd3cc8aacda4f0ed5a9c3a2e52 (diff)
downloadgeiser-chez-e279622a64a42aedfcc388ff4df45319f76f794d.tar.gz
geiser-chez-e279622a64a42aedfcc388ff4df45319f76f794d.tar.bz2
Using font-lock-function-name-face for define-syntax-rule
The name defined It's more like a function in a define than a variable, since it can take arguments.
Diffstat (limited to 'elisp')
-rw-r--r--elisp/geiser-syntax.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/elisp/geiser-syntax.el b/elisp/geiser-syntax.el
index 8b427f6..9aa02fc 100644
--- a/elisp/geiser-syntax.el
+++ b/elisp/geiser-syntax.el
@@ -1,6 +1,6 @@
;;; geiser-syntax.el -- utilities for parsing scheme syntax
-;; Copyright (C) 2009, 2010, 2011, 2012, 2013 Jose Antonio Ortega Ruiz
+;; Copyright (C) 2009, 2010, 2011, 2012, 2013, 2014 Jose Antonio Ortega Ruiz
;; This program is free software; you can redistribute it and/or
;; modify it under the terms of the Modified BSD License. You should
@@ -57,7 +57,7 @@
(,(rx "(" (group "define-syntax-rule") eow (* space)
(? "(") (? (group (1+ word))))
(1 font-lock-keyword-face)
- (2 font-lock-variable-name-face))))
+ (2 font-lock-function-name-face))))
(font-lock-add-keywords 'scheme-mode geiser-syntax--keywords)