--- a/NoteBookView.st	Tue Jun 10 13:54:39 2014 +0200
+++ b/NoteBookView.st	Tue Jun 10 15:30:12 2014 +0200
@@ -1720,7 +1720,7 @@
              and:[aTab intersects:damage]]
             ) ifTrue:[
                 clip notNil ifTrue:[
-                    self clippingBounds:clip.
+                    self deviceClippingRectangle:clip. "/ was: self clippingBounds:clip.
                     clip := nil.
                 ].
                 self redrawTab:aTab.
@@ -1734,7 +1734,7 @@
     tabLayout := self computeLayoutForTab:selectedTab.
     (tabLayout intersects:damage) ifTrue:[
         clip notNil ifTrue:[
-            self clippingBounds:clip.
+            self deviceClippingRectangle:clip. "/ was: self clippingBounds:clip.
             clip := nil.
         ].
 "/        selectedLayout := selectedTab layout.
@@ -3784,10 +3784,10 @@
 !NoteBookView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/NoteBookView.st,v 1.184 2014-03-25 18:02:50 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/NoteBookView.st,v 1.185 2014-06-10 13:30:12 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/NoteBookView.st,v 1.184 2014-03-25 18:02:50 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/NoteBookView.st,v 1.185 2014-06-10 13:30:12 cg Exp $'
 ! !