added:
authorClaus Gittinger <cg@exept.de>
Sun, 24 Jul 2011 21:32:43 +0200
changeset 13522 4ea9f70448e4
parent 13521 3faf9238433e
child 13523 03ec11a75c9d
added: #xmlAttributeColor #xmlAttributeEmphasis #xmlCDataColor #xmlCDataEmphasis
UserPreferences.st
--- a/UserPreferences.st	Sun Jul 24 10:32:42 2011 +0200
+++ b/UserPreferences.st	Sun Jul 24 21:32:43 2011 +0200
@@ -2699,6 +2699,62 @@
     "Modified: / 1.4.1998 / 13:22:45 / cg"
 !
 
+xmlAttributeColor
+    "the emphasis used for xml-attributes;
+     If syntaxColoring is turned on."
+
+    ^ self at:#xmlAttributeColor ifAbsentPut:[ Color green darkened ]
+
+    "
+     self current at:#xmlAttributeColor put:Color black
+     self current xmlAttributeColor         
+    "
+
+    "Created: / 24-07-2011 / 21:30:59 / cg"
+!
+
+xmlAttributeEmphasis
+    "the emphasis used for xml-attributes;
+     If syntaxColoring is turned on."
+
+    ^ self at:#xmlAttributeEmphasis ifAbsentPut:[ #normal ]
+
+    "
+     self current at:#xmlAttributeEmphasis put:#normal
+     self current xmlAttributeEmphasis
+    "
+
+    "Created: / 24-07-2011 / 21:30:29 / cg"
+!
+
+xmlCDataColor
+    "the emphasis used for xml-CData;
+     If syntaxColoring is turned on."
+
+    ^ self at:#xmlCDataColor ifAbsentPut:[ Color blue ]
+
+    "
+     self current at:#xmlCDataColor put:Color black
+     self current xmlCDataColor         
+    "
+
+    "Created: / 24-07-2011 / 21:31:30 / cg"
+!
+
+xmlCDataEmphasis
+    "the emphasis used for xml-CData;
+     If syntaxColoring is turned on."
+
+    ^ self at:#xmlCDataEmphasis ifAbsentPut:[ #normal ]
+
+    "
+     self current at:#xmlCDataEmphasis put:#normal
+     self current xmlCDataEmphasis
+    "
+
+    "Created: / 24-07-2011 / 21:31:52 / cg"
+!
+
 xmlTagColor
     "the emphasis used for xml-tags;
      If syntaxColoring is turned on."
@@ -3370,6 +3426,7 @@
     ^ self at:#verboseBacktraceInDebugger put:aBoolean
 ! !
 
+
 !UserPreferences methodsFor:'default settings - syntax colors'!
 
 listOfPredefinedSyntaxColoringSchemes
@@ -3590,7 +3647,7 @@
 !UserPreferences class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.282 2011-07-08 11:23:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.283 2011-07-24 19:32:43 cg Exp $'
 !
 
 version_SVN