--- a/private.rc	Sat Apr 25 19:59:02 1998 +0200
+++ b/private.rc	Sat Apr 25 22:51:55 1998 +0200
@@ -50,6 +50,11 @@
 
 |whoAmI domain thisIsMySystem conf systemType incDir includes|
 
+whoAmI := OperatingSystem getLoginName.
+domain := OperatingSystem getDomainName.
+thisIsMySystem := (whoAmI = 'claus' or:[whoAmI = 'cg'])
+		  and:[domain = 'axept.de' or:[domain = 'exept.de']].
+
 'private.rc [info]: reading ''keyboard.rc'' ...' infoPrintCR.
 Smalltalk fileIn:'keyboard.rc'.
 
@@ -57,21 +62,23 @@
 "/ no matter what the 'display.rc' says:
 "/     I want my #iris style ...
 "/
-Display hasGrayscales ifTrue:[
-    OperatingSystem getOSType = 'win32' ifTrue:[
-	View defaultStyle:#mswindows3
+
+thisIsMySystem ifTrue:[
+    Display hasGrayscales ifTrue:[
+	OperatingSystem getOSType = 'win32' ifTrue:[
+	    View defaultStyle:#mswindows95
+	] ifFalse:[
+	    View defaultStyle:#iris.
+	    "/
+	    "/ or whatever you like as default ...
+	    "/
+	    "/ View defaultStyle:#motif.
+	]
     ] ifFalse:[
-	View defaultStyle:#iris.
-	"/
-	"/ or whatever you like as default ...
-	"/
-	"/ View defaultStyle:#motif.
-    ]
-] ifFalse:[
-    View defaultStyle:#normal
+	View defaultStyle:#normal
+    ].
 ].
 
-
 "/ add my private directories to the searchPath ...
 "/ This does not make sense in your environment.
 "/ However, I leave the code here to show how its done.
@@ -81,10 +88,6 @@
 "/
 "/ some of my private settings ...
 "/
-whoAmI := OperatingSystem getLoginName.
-domain := OperatingSystem getDomainName.
-thisIsMySystem := (whoAmI = 'claus' or:[whoAmI = 'cg'])
-		  and:[domain = 'axept.de' or:[domain = 'exept.de']].
 
 thisIsMySystem ifTrue:[
     "/