Update of /project/lisppaste/cvsroot/lisppaste2 In directory common-lisp.net:/home/bmastenbrook/lisppaste2
Modified Files: coloring-types.lisp Log Message: Only colorize in parens in lisp mode
Date: Tue Jun 15 06:52:52 2004 Author: bmastenbrook
Index: lisppaste2/coloring-types.lisp diff -u lisppaste2/coloring-types.lisp:1.6 lisppaste2/coloring-types.lisp:1.7 --- lisppaste2/coloring-types.lisp:1.6 Fri Jun 11 07:34:34 2004 +++ lisppaste2/coloring-types.lisp Tue Jun 15 06:52:52 2004 @@ -27,7 +27,7 @@ :single-escaped :in-list :syntax-error) :default-mode :normal :transitions - (((:normal :in-list) + (((:in-list) ((or (scan-any *symbol-characters*) (and (scan #.) (scan-any *symbol-characters*)) @@ -56,6 +56,10 @@ ((scan "#|") (set-mode :multiline :until (scan "|#"))) + ((scan #() + (set-mode :in-list + :until (scan #))))) + (:normal ((scan #() (set-mode :in-list :until (scan #)))))