Update of /project/lisppaste/cvsroot/lisppaste2 In directory clnet:/tmp/cvs-serv16440
Modified Files: coloring-types.lisp Log Message: Add autodetection for Erlang syntax coloring
--- /project/lisppaste/cvsroot/lisppaste2/coloring-types.lisp 2006/08/14 21:33:00 1.19 +++ /project/lisppaste/cvsroot/lisppaste2/coloring-types.lisp 2006/08/14 21:34:02 1.20 @@ -520,6 +520,8 @@ (defparameter *erlang-terminators* '(#\space #\return #\tab #\newline #. #; #, #/ #- #* #+ #( #) #' #" #[ #] #< #> #{ #}))
(define-coloring-type :erlang "Erlang" + :autodetect (lambda (text) + (search "erlang" text :test #'char=)) :modes (:first-char-on-line :normal :char :comment :word-ish :variable :atom :paren-ish :string :single-escape :attribute :function :macro) :default-mode :first-char-on-line :transitions