--- a/SimpleView.st	Tue May 28 21:12:57 1996 +0200
+++ b/SimpleView.st	Tue May 28 21:16:07 1996 +0200
@@ -1085,7 +1085,7 @@
     StyleSheet fileReadFailed ifTrue:[
         bgGrey := White
     ] ifFalse:[
-        Display hasGreyscales ifTrue:[
+        Display hasGrayscales ifTrue:[
             bgGrey := Grey
         ] ifFalse:[
             bgGrey := White 
@@ -1131,7 +1131,7 @@
         DefaultViewBackgroundColor := White
     ].
 
-    "Modified: 18.3.1996 / 12:52:12 / cg"
+    "Modified: 28.5.1996 / 21:14:06 / cg"
 !
 
 viewSpacing
@@ -1326,12 +1326,14 @@
      edges."
 
     something isColor ifTrue:[
-	device hasGreyscales ifTrue:[
-	    shadowColor := something darkened.
-	    lightColor := something lightened
-	]
+        device hasGrayscales ifTrue:[
+            shadowColor := something darkened.
+            lightColor := something lightened
+        ]
     ].
     super viewBackground:something
+
+    "Modified: 28.5.1996 / 21:14:01 / cg"
 !
 
 viewShape:aForm
@@ -3917,7 +3919,7 @@
     DefaultLightColor notNil ifTrue:[
         lightColor := DefaultLightColor.
     ] ifFalse:[
-        device hasGreyscales ifTrue:[
+        device hasGrayscales ifTrue:[
             DefaultLightColor := lightColor := viewBackground lightened.
         ] ifFalse:[
             "
@@ -3940,7 +3942,7 @@
     font := self class defaultFont.
     font := font on:device.
 
-    "Modified: 28.5.1996 / 20:55:25 / cg"
+    "Modified: 28.5.1996 / 21:13:58 / cg"
 !
 
 initStyleSheet
@@ -6124,6 +6126,6 @@
 !SimpleView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.105 1996-05-28 19:04:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.106 1996-05-28 19:16:07 cg Exp $'
 ! !
 SimpleView initialize!