Index: /trunk/source/cocoa-ide/hemlock/src/defsyn.lisp
===================================================================
--- /trunk/source/cocoa-ide/hemlock/src/defsyn.lisp	(revision 12510)
+++ /trunk/source/cocoa-ide/hemlock/src/defsyn.lisp	(revision 12511)
@@ -74,4 +74,27 @@
 (shadow-attribute :word-delimiter #\backspace 0 "Text")
 (shadow-attribute :word-delimiter #\_ 0 "Text")
+
+;; These aren't generally used to separate words in a Lisp symbol
+(shadow-attribute :word-delimiter #\* 0 "Lisp")
+(shadow-attribute :word-delimiter #\! 0 "Lisp")
+(shadow-attribute :word-delimiter #\$ 0 "Lisp")
+(shadow-attribute :word-delimiter #\+ 0 "Lisp")
+(shadow-attribute :word-delimiter #\% 0 "Lisp")
+(shadow-attribute :word-delimiter #\^ 0 "Lisp")
+(shadow-attribute :word-delimiter #\& 0 "Lisp")
+(shadow-attribute :word-delimiter #\? 0 "Lisp")
+(shadow-attribute :word-delimiter #\_ 0 "Lisp")
+(shadow-attribute :word-delimiter #\= 0 "Lisp")
+(shadow-attribute :word-delimiter #\[ 0 "Lisp")
+(shadow-attribute :word-delimiter #\] 0 "Lisp")
+(shadow-attribute :word-delimiter #\\ 0 "Lisp")
+(shadow-attribute :word-delimiter #\| 0 "Lisp")
+(shadow-attribute :word-delimiter #\{ 0 "Lisp")
+(shadow-attribute :word-delimiter #\} 0 "Lisp")
+(shadow-attribute :word-delimiter #\< 0 "Lisp")
+(shadow-attribute :word-delimiter #\> 0 "Lisp")
+(shadow-attribute :word-delimiter #\/ 0 "Lisp")
+(shadow-attribute :word-delimiter #\~ 0 "Lisp")
+