--- a/SelectionInTreeView.st Fri Jan 20 18:51:50 2017 +0100
+++ b/SelectionInTreeView.st Fri Jan 20 18:52:35 2017 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 1997 by eXept Software AG / Claus Gittinger
All Rights Reserved
@@ -1202,9 +1200,9 @@
startY := self yOfVisibleLine:visStart.
dltLine := startLn - visStart.
stopLn := dltLine + visEnd.
+
savClip := self clippingBoundsOrNil.
-
- self clippingRectangle:(Rectangle left:x top:y width:w height:h).
+ self clippingBounds:(Rectangle left:x top:y width:w height:h).
(highlightMode == #line and:[self hasSelection]) ifTrue:[
"/ redraw the background for all selected lines in the invalid range
@@ -1229,7 +1227,7 @@
sel do:[:y0| self redrawSelFrameAtX:x y:y0 toX:maxX]
].
- self clippingRectangle:savClip.
+ self clippingBounds:savClip.
! !
!SelectionInTreeView methodsFor:'enumerating'!