--- a/GraphicsMedium.st	Wed Oct 02 02:21:35 2019 +0200
+++ b/GraphicsMedium.st	Fri Oct 04 11:44:04 2019 +0200
@@ -2228,11 +2228,11 @@
     self clearDeviceRectangleX:0 y:0 width:width height:height
 !
 
-fill:something
-    "fill the receiver with something;
+fill:aColorOrFormOrColorIndex
+    "fill the receiver with aColorOrFormOrColorIndex;
      something may be a Form, Color or colorIndex"
 
-    gc fillRectangle:(self boundingBox) color:something
+    gc fillRectangle:(self boundingBox) color:aColorOrFormOrColorIndex
 !
 
 fillArc:origin radius:r from:startAngle angle:angle