--- a/Button.st	Sun Feb 12 12:59:48 2017 +0100
+++ b/Button.st	Sun Feb 12 13:00:01 2017 +0100
@@ -1552,20 +1552,21 @@
     "Modified: 3.3.1997 / 18:11:58 / cg"
 !
 
-viewBackground:something
-    super viewBackground:something.
-    something isColor ifTrue:[
+viewBackground:aColorOrForm
+    super viewBackground:aColorOrForm.
+    aColorOrForm isColor ifTrue:[
         device hasGrayscales ifTrue:[
             halfLightColor notNil ifTrue:[
-                halfLightColor := (something averageColorIn:(0@0 corner:7@7)) lightened "on:device".
+                halfLightColor := (aColorOrForm averageColorIn:(0@0 corner:7@7)) lightened "on:device".
             ].
             halfShadowColor notNil ifTrue:[
-                halfShadowColor := (something averageColorIn:(0@0 corner:7@7)) darkened "on:device".
+                halfShadowColor := (aColorOrForm averageColorIn:(0@0 corner:7@7)) darkened "on:device".
             ]
         ]
     ].
 
-    "Modified: 3.5.1997 / 10:37:24 / cg"
+    "Modified: / 03-05-1997 / 10:37:24 / cg"
+    "Modified (format): / 12-02-2017 / 12:58:10 / cg"
 ! !
 
 !Button methodsFor:'changing state'!