--- a/Button.st	Tue May 28 21:03:25 1996 +0200
+++ b/Button.st	Tue May 28 21:11:28 1996 +0200
@@ -1568,7 +1568,7 @@
         lightColor := White.
     ].
 
-    hasGreyscales := device hasGreyscales.
+    hasGreyscales := device hasGrayscales.
     (edgeStyle == #soft) ifTrue:[
         DefaultHalfShadowColor notNil ifTrue:[halfShadowColor := DefaultHalfShadowColor on:device].
         DefaultHalfLightColor notNil ifTrue:[halfLightColor := DefaultHalfLightColor on:device].
@@ -1657,7 +1657,7 @@
         ].
     ].
 
-    "Modified: 28.5.1996 / 20:52:29 / cg"
+    "Modified: 28.5.1996 / 21:11:04 / cg"
 !
 
 initialize
@@ -1986,5 +1986,5 @@
 !Button class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.59 1996-05-28 19:00:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.60 1996-05-28 19:11:28 cg Exp $'
 ! !