--- a/Scroller.st	Fri Jan 20 18:51:17 2017 +0100
+++ b/Scroller.st	Fri Jan 20 18:51:30 2017 +0100
@@ -1435,8 +1435,8 @@
     |oldClip gX gY gW gH|
 
     shown ifTrue:[
-        oldClip := self clippingRectangleOrNil.
-        self clippingRectangle:(Rectangle left:x top:y width:w height:h).
+        oldClip := self clippingBoundsOrNil.
+        self clippingBounds:(Rectangle left:x top:y width:w height:h).
         self clearDeviceRectangleX:x y:y width:w height:h.
 
         styleSheet name == #winVista ifTrue:[
@@ -1474,7 +1474,7 @@
                 ]
             ]
         ].
-        self clippingRectangle:oldClip
+        self clippingBounds:oldClip
     ]
 
     "Modified: / 4.5.1999 / 18:51:53 / cg"