diff options
author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2014-02-25 00:48:28 +0100 |
---|---|---|
committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2014-02-25 00:48:28 +0100 |
commit | f2143159ccba5686ee110c1b56be5484db3576bf (patch) | |
tree | 4207d91cf84475b7cb50620cf0508aa059df5fc2 | |
parent | d2b9757f6c3e13e6b5cbd39a86d7ef2f3f67b023 (diff) | |
download | geiser-f2143159ccba5686ee110c1b56be5484db3576bf.tar.gz geiser-f2143159ccba5686ee110c1b56be5484db3576bf.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.
-rw-r--r-- | elisp/geiser-syntax.el | 4 |
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) |