--- a/UserPreferences.st	Wed Apr 01 11:57:20 1998 +0200
+++ b/UserPreferences.st	Wed Apr 01 12:18:50 1998 +0200
@@ -253,7 +253,13 @@
 syntaxColoring:aBoolean
     ^ self at:#syntaxColoring put:aBoolean
 
+    "
+     UserPreferences current syntaxColoring:true
+     UserPreferences current syntaxColoring:false
+    "
+
     "Created: / 31.3.1998 / 13:44:00 / cg"
+    "Modified: / 1.4.1998 / 12:18:44 / cg"
 !
 
 thisContextColor
@@ -287,5 +293,5 @@
 !UserPreferences class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.7 1998-04-01 09:57:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.8 1998-04-01 10:18:50 cg Exp $'
 ! !