[Nano-devel] [PATCH 2/2] Elisp syntax

[Mark Oteiza]

Index: Makefile.am
===================================================================
--- doc/syntax/Makefile.am      (revision 5198)
+++ doc/syntax/Makefile.am      (working copy)
@@ -6,6 +6,7 @@
                css.nanorc \
                debian.nanorc \
                default.nanorc \
+               elisp.nanorc \
                fortran.nanorc \
                gentoo.nanorc \
                go.nanorc \
Index: elisp.nanorc
===================================================================
--- doc/syntax/elisp.nanorc     (revision 0)
+++ doc/syntax/elisp.nanorc     (working copy)
@@ -0,0 +1,21 @@
+## Here is an example for Emacs lisp.
+
+syntax "elisp" "\.el$"
+
+color green "\<(let|if|when|unless|lambda|map)\>"
+color brightcyan "\<(defun|defmacro)\>"
+color brightcyan "\<(defvar|defconst)\>"
+color brightcyan "\<(defgroup|defcustom|defface)\>"
+color brightcyan "\<(setq|setq-default|setq-local)\>"
+color brightcyan "\<(require|provide)\>"
+# Quoted symbols
+color brightyellow "#?'\<(\w|-)+\>"
+# Booleans
+color brightred "\<(t|nil)\>"
+# Keywords
+color blue ":(\w|[?-])+"
+# Strings
+color yellow start="^[[:blank:]]+\"" end="[^\]\""
+color yellow ""(\\.|[^"])*""
+# Comments
+color cyan "(^|[[:space:]]);.*$"