--- a/NoteBookView.st	Fri Jan 20 18:52:54 2017 +0100
+++ b/NoteBookView.st	Fri Jan 20 23:05:37 2017 +0100
@@ -1811,7 +1811,7 @@
     ].
 
 "/ NEW CODE
-    (damage areasOutside:borderLayout) do:[:r|
+    damage areasOutside:borderLayout do:[:r|
         self paint:(superView viewBackground).
         self fillRectangle:r.
     ].
@@ -1848,7 +1848,7 @@
              and:[aTab intersects:damage]]
             ) ifTrue:[
                 clip notNil ifTrue:[
-                    self deviceClippingRectangle:clip. "/ was: self clippingBounds:clip.
+                    self deviceClippingBounds:clip. "/ was: self clippingBounds:clip.
                     clip := nil.
                 ].
                 self redrawTab:aTab.
@@ -1862,7 +1862,7 @@
     tabLayout := self computeLayoutForTab:selectedTab.
     (tabLayout intersects:damage) ifTrue:[
         clip notNil ifTrue:[
-            self deviceClippingRectangle:clip. "/ was: self clippingBounds:clip.
+            self deviceClippingBounds:clip. "/ was: self clippingBounds:clip.
             clip := nil.
         ].
 "/        selectedLayout := selectedTab layout.