--- a/UserPreferences.st	Sat Feb 05 15:13:54 2000 +0100
+++ b/UserPreferences.st	Sat Feb 05 15:27:20 2000 +0100
@@ -59,6 +59,7 @@
         #useNewChangesBrowser           false
         #useNewInspector                false
 
+        #autoFormatting                 false
         #syntaxColoring                 true
         #fullSelectorCheck              false
 
@@ -92,7 +93,7 @@
      self initializeDefaultPreferences
     "
 
-    "Modified: / 15.12.1999 / 22:22:21 / cg"
+    "Modified: / 4.2.2000 / 20:06:53 / cg"
 ! !
 
 !UserPreferences class methodsFor:'accessing'!
@@ -217,7 +218,7 @@
     "Modified: / 5.1.1980 / 00:48:09 / cg"
 ! !
 
-!UserPreferences methodsFor:'accessing - pref''d tools'!
+!UserPreferences methodsFor:'accessing-pref''d tools'!
 
 changesBrowserClass
     self useNewChangesBrowser ifTrue:[
@@ -228,7 +229,36 @@
     "Created: / 17.10.1998 / 14:37:46 / cg"
 ! !
 
-!UserPreferences methodsFor:'accessing - prefs'!
+!UserPreferences methodsFor:'accessing-prefs'!
+
+autoFormatting
+    "return the flag which controls automatic formatting of code (in some browsers)
+     Notice, the regular browser does not (yet) do automatic formating."
+
+    ^ self at:#autoFormatting ifAbsentPut:false
+
+    "
+     UserPreferences current autoFormatting
+    "
+
+    "Created: / 4.2.2000 / 20:08:08 / cg"
+    "Modified: / 5.2.2000 / 15:38:33 / cg"
+!
+
+autoFormatting:aBoolean
+    "turn on/off automatic formatting of code (in some browsers);
+     Notice, the regular browser does not (yet) do automatic formating."
+
+    ^ self at:#autoFormatting put:aBoolean
+
+    "
+     UserPreferences current autoFormatting:true
+     UserPreferences current autoFormatting:false
+    "
+
+    "Created: / 4.2.2000 / 20:08:26 / cg"
+    "Modified: / 5.2.2000 / 15:38:20 / cg"
+!
 
 beepEnabled
     "return the flag which controls the beeper"
@@ -444,7 +474,7 @@
     "Modified: / 13.10.1998 / 15:53:21 / cg"
 ! !
 
-!UserPreferences methodsFor:'accessing - syntaxColoring prefs'!
+!UserPreferences methodsFor:'accessing-syntaxColoring prefs'!
 
 argumentIdentifierColor
     "the color used for argument identifiers;
@@ -1035,5 +1065,5 @@
 !UserPreferences class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.51 1999-12-15 21:21:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.52 2000-02-05 14:27:20 cg Exp $'
 ! !