--- a/SelTreeV.st Fri Oct 02 18:52:09 1998 +0200
+++ b/SelTreeV.st Sat Oct 03 11:03:49 1998 +0200
@@ -1960,13 +1960,12 @@
"redefined to scroll whenever line is not in top half"
(aListLineNr >= firstLineShown) ifTrue:[
- (aListLineNr < (firstLineShown + (nFullLinesShown // 2))) ifTrue:[
+ (aListLineNr < (firstLineShown + nFullLinesShown)) ifTrue:[
^ false
]
].
^ true
- "Modified: / 7.8.1998 / 15:36:42 / cg"
! !
!SelectionInTreeView methodsFor:'selection'!
@@ -2134,5 +2133,5 @@
!SelectionInTreeView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/Attic/SelTreeV.st,v 1.67 1998-09-01 13:38:18 tz Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/Attic/SelTreeV.st,v 1.68 1998-10-03 09:03:49 tz Exp $'
! !
--- a/SelectionInTreeView.st Fri Oct 02 18:52:09 1998 +0200
+++ b/SelectionInTreeView.st Sat Oct 03 11:03:49 1998 +0200
@@ -1960,13 +1960,12 @@
"redefined to scroll whenever line is not in top half"
(aListLineNr >= firstLineShown) ifTrue:[
- (aListLineNr < (firstLineShown + (nFullLinesShown // 2))) ifTrue:[
+ (aListLineNr < (firstLineShown + nFullLinesShown)) ifTrue:[
^ false
]
].
^ true
- "Modified: / 7.8.1998 / 15:36:42 / cg"
! !
!SelectionInTreeView methodsFor:'selection'!
@@ -2134,5 +2133,5 @@
!SelectionInTreeView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTreeView.st,v 1.67 1998-09-01 13:38:18 tz Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTreeView.st,v 1.68 1998-10-03 09:03:49 tz Exp $'
! !