--- a/UserPreferences.st	Wed Jul 07 14:17:45 1999 +0200
+++ b/UserPreferences.st	Wed Jul 07 14:22:12 1999 +0200
@@ -52,8 +52,6 @@
     DefaultPreferences := self new.
 
     #(
-        #errorColor                     (Color red)
-
         #useNewChangesBrowser           false
         #useNewInspector                false
 
@@ -63,6 +61,8 @@
         #defaultSyntaxColor             (Color black)
         #defaultSyntaxEmphasis          normal
 
+        #errorColor                     (Color red)
+
         #commentColor                   (Color 12.5 12.5 100)
         #commentEmphasis                italic
 
@@ -346,6 +346,26 @@
     "
      UserPreferences current useNewInspector
     "
+!
+
+useNewVersionDiffBrowser
+    "using new or old version diff viewer"
+
+    ^ self at:#useNewVersionDiffBrowser ifAbsentPut:false
+
+    "Modified: / 13.10.1998 / 15:53:05 / cg"
+!
+
+useNewVersionDiffBrowser:aBoolean
+    "using new or old useNewVersionDiffBrowser"
+
+    ^ self at:#useNewVersionDiffBrowser put:aBoolean
+
+    "
+     UserPreferences current useNewVersionDiffBrowser
+    "
+
+    "Modified: / 13.10.1998 / 15:53:21 / cg"
 ! !
 
 !UserPreferences methodsFor:'accessing - syntaxColoring prefs'!
@@ -921,6 +941,6 @@
 !UserPreferences class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.41 1999-07-07 12:17:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.42 1999-07-07 12:22:12 cg Exp $'
 ! !
 UserPreferences initialize!