--- a/SimpleView.st Wed Sep 14 15:05:23 2016 +0200
+++ b/SimpleView.st Wed Sep 14 17:50:33 2016 +0200
@@ -8648,7 +8648,7 @@
oldPaint := nil.
newWidth > width ifTrue:[
- self clippingRectangle:nil.
+ self clippingBounds:nil.
oldPaint := self paint.
self paint:viewBackground.
self fillDeviceRectangleX:(width - margin)
@@ -8658,7 +8658,7 @@
mustRepaintRight := true.
].
newHeight > height ifTrue:[
- self clippingRectangle:nil.
+ self clippingBounds:nil.
oldPaint := self paint.
self paint:viewBackground.
self fillDeviceRectangleX:0
@@ -8714,7 +8714,7 @@
self invalidateDeviceRectangle:(((width - margin) @ 0) extent:margin@height) repairNow:false.
].
] ifFalse:[
- self deviceClippingRectangle:nil.
+ self deviceClippingBounds:nil.
oldPaint := self paint.
mustRedrawBottomEdge ifTrue:[
self drawBottomEdge
@@ -8723,7 +8723,7 @@
self drawRightEdge
].
self paint:oldPaint.
- self deviceClippingRectangle:innerClipRect
+ self deviceClippingBounds:innerClipRect
]
].
].
@@ -8755,7 +8755,7 @@
self originChangedFlag:true.
].
self extentChangedFlag:true.
- subViews size > 0 ifTrue:[
+ subViews notEmptyOrNil ifTrue:[
self extentChangedBeforeCreatedFlag:true.
].
].