--- a/GraphicsMedium.st Wed Feb 01 21:42:41 2017 +0000
+++ b/GraphicsMedium.st Wed Feb 01 22:17:58 2017 +0000
@@ -1814,9 +1814,7 @@
left := origin x.
top := origin y.
- self displayRectangleX:left y:top
- width:(corner x - left)
- height:(corner y - top)
+ self displayRectangleX:left y:top width:(corner x - left) height:(corner y - top)
!
displayRectangleOrigin:origin extent:extent
@@ -2420,7 +2418,7 @@
"fill the receiver with something;
something may be a Form, Color or colorIndex"
- gc fillRectangle:self boundingBox color:something
+ gc fillRectangle:(self boundingBox) color:something
!
fillArc:origin radius:r from:startAngle angle:angle