--- a/UserPreferences.st	Mon Jun 16 19:57:18 2014 +0200
+++ b/UserPreferences.st	Tue Jun 17 11:15:08 2014 +0200
@@ -76,7 +76,7 @@
         #errorColor                     (Color red)
 
         "/ #commentColor                   (Color 12.5 12.5 100)
-        "/ #constantColor                  (Color 25 0 0)
+        #commentColor                   (Color 0 50 0)
         #commentEmphasis                normal
 
         #methodSelectorEmphasis         bold
@@ -92,16 +92,19 @@
         "/      #sideEffectAssignmentColor          (Color 75 0 0)
         "/ #sideEffectAssignmentBackgroundColor    (Color 100 86 86)
 
-"/        #jsKeywordColor                 (Color black)
         #jsKeywordEmphasis              bold
+        "/ #jsKeywordColor                 (Color black)
         #jsKeywordColor                 (Color 33 33 0)
 
         #controlFlowSelectorColor       (Color 0 0 100)
         #debugSelectorColor             (Color 80 0 0)
         #errorRaisingSelectorColor      (Color 80 0 0)
-        #commentColor                   (Color 0 50 0)
+        "/ #constantColor                  (Color 25 0 0)
         #constantColor                  (Color 64 8 8)
 
+        #globalIdentifierColor          (Color 67 0 67)
+        #unknownIdentifierColor         (Color 67 0 67)
+
         #returnColor                    (Color 0 0 100)
         #returnEmphasis                 bold
      ) pairWiseDo:[:k :v |
@@ -2661,7 +2664,7 @@
     "the color used for boolean constants;
      If syntaxColoring is turned on."
 
-    ^ self at:#booleanConstantColor ifAbsentPut:[self constantColor]
+    ^ self at:#booleanConstantColor ifAbsent:[self constantColor]
 
     "Created: / 31.3.1998 / 18:12:06 / cg"
     "Modified: / 1.4.1998 / 13:20:07 / cg"
@@ -2671,7 +2674,7 @@
     "the emphasis used for boolean constants;
      If syntaxColoring is turned on."
 
-    ^ self at:#booleanConstantEmphasis ifAbsentPut:[self constantEmphasis]
+    ^ self at:#booleanConstantEmphasis ifAbsent:[self constantEmphasis]
 
     "Created: / 31.3.1998 / 18:12:46 / cg"
     "Modified: / 1.4.1998 / 13:26:01 / cg"
@@ -3245,7 +3248,7 @@
     "the color used for string constants;
      If syntaxColoring is turned on."
 
-    ^ self at:#stringColor ifAbsentPut:[self constantColor]
+    ^ self at:#stringColor ifAbsent:[self constantColor]
 
     "Created: / 31.3.1998 / 15:19:50 / cg"
     "Modified: / 1.4.1998 / 13:22:06 / cg"
@@ -3291,7 +3294,7 @@
     "the color used for symbol constants;
      If syntaxColoring is turned on."
 
-    ^ self at:#symbolColor ifAbsentPut:[self constantColor]
+    ^ self at:#symbolColor ifAbsent:[self constantColor]
 
     "Created: / 1.4.1998 / 12:57:35 / cg"
     "Modified: / 1.4.1998 / 13:22:16 / cg"
@@ -4948,11 +4951,11 @@
 !UserPreferences class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.376 2014-06-16 13:56:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.377 2014-06-17 09:15:08 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.376 2014-06-16 13:56:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.377 2014-06-17 09:15:08 cg Exp $'
 !
 
 version_SVN