--- a/SelectionInTreeView.st	Mon Sep 24 15:00:49 2001 +0200
+++ b/SelectionInTreeView.st	Fri Sep 28 15:25:11 2001 +0200
@@ -1387,7 +1387,7 @@
      and:[showDirectoryIndicator
      and:[aButton == 1 or:[aButton == #select]]]
     ) ifTrue:[
-        nr := self visibleLineToListLine:(self visibleLineOfY:y).
+        nr := self lineAtY:y. "/ self visibleLineToListLine:(self visibleLineOfY:y).
 
         nr notNil ifTrue:[
             node := listOfNodes at:nr.
@@ -2472,5 +2472,5 @@
 !SelectionInTreeView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTreeView.st,v 1.93 2001-05-17 11:10:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTreeView.st,v 1.94 2001-09-28 13:25:11 cg Exp $'
 ! !