--- 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.
         ].
     ].