Mercurial > emacs
changeset 60180:d5618f820425
(scheme-font-lock-keywords-2): Handle named-let.
author | Thien-Thi Nguyen <ttn@gnuvola.org> |
---|---|
date | Sun, 20 Feb 2005 12:05:09 +0000 |
parents | c0c13351b8c7 |
children | 5e2bb0366797 |
files | lisp/progmodes/scheme.el |
diffstat | 1 files changed, 4 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/scheme.el Sun Feb 20 05:02:54 2005 +0000 +++ b/lisp/progmodes/scheme.el Sun Feb 20 12:05:09 2005 +0000 @@ -330,6 +330,10 @@ "map" "syntax" "syntax-rules") t) "\\>") 1) ;; + ;; It wouldn't be Scheme w/o named-let. + '("(let\\s-+\\(\\sw+\\)" + (1 font-lock-function-name-face)) + ;; ;; David Fox <fox@graphics.cs.nyu.edu> for SOS/STklos class specifiers. '("\\<<\\sw+>\\>" . font-lock-type-face) ;;