equal
deleted
inserted
replaced
1385 |
1385 |
1386 ( enabled |
1386 ( enabled |
1387 and:[showDirectoryIndicator |
1387 and:[showDirectoryIndicator |
1388 and:[aButton == 1 or:[aButton == #select]]] |
1388 and:[aButton == 1 or:[aButton == #select]]] |
1389 ) ifTrue:[ |
1389 ) ifTrue:[ |
1390 nr := self visibleLineToListLine:(self visibleLineOfY:y). |
1390 nr := self lineAtY:y. "/ self visibleLineToListLine:(self visibleLineOfY:y). |
1391 |
1391 |
1392 nr notNil ifTrue:[ |
1392 nr notNil ifTrue:[ |
1393 node := listOfNodes at:nr. |
1393 node := listOfNodes at:nr. |
1394 node hasChildren ifTrue:[ |
1394 node hasChildren ifTrue:[ |
1395 x0 := self xOfFigureLevel:(node level - 1). |
1395 x0 := self xOfFigureLevel:(node level - 1). |
2470 ! ! |
2470 ! ! |
2471 |
2471 |
2472 !SelectionInTreeView class methodsFor:'documentation'! |
2472 !SelectionInTreeView class methodsFor:'documentation'! |
2473 |
2473 |
2474 version |
2474 version |
2475 ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTreeView.st,v 1.93 2001-05-17 11:10:34 cg Exp $' |
2475 ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTreeView.st,v 1.94 2001-09-28 13:25:11 cg Exp $' |
2476 ! ! |
2476 ! ! |