SelectionInTreeView.st
changeset 1162 b1aee7c3fd98
parent 1105 c79bb5824b74
child 1171 0199f65bc8ce
equal deleted inserted replaced
1161:42796d8e6544 1162:b1aee7c3fd98
  1958 
  1958 
  1959 needScrollToMakeLine:aListLineNr
  1959 needScrollToMakeLine:aListLineNr
  1960     "redefined to scroll whenever line is not in top half"
  1960     "redefined to scroll whenever line is not in top half"
  1961 
  1961 
  1962     (aListLineNr >= firstLineShown) ifTrue:[
  1962     (aListLineNr >= firstLineShown) ifTrue:[
  1963         (aListLineNr < (firstLineShown + (nFullLinesShown // 2))) ifTrue:[
  1963         (aListLineNr < (firstLineShown + nFullLinesShown)) ifTrue:[
  1964             ^ false
  1964             ^ false
  1965         ]
  1965         ]
  1966     ].
  1966     ].
  1967     ^ true
  1967     ^ true
  1968 
  1968 
  1969     "Modified: / 7.8.1998 / 15:36:42 / cg"
       
  1970 ! !
  1969 ! !
  1971 
  1970 
  1972 !SelectionInTreeView methodsFor:'selection'!
  1971 !SelectionInTreeView methodsFor:'selection'!
  1973 
  1972 
  1974 selectNode:aNode
  1973 selectNode:aNode
  2132 ! !
  2131 ! !
  2133 
  2132 
  2134 !SelectionInTreeView class methodsFor:'documentation'!
  2133 !SelectionInTreeView class methodsFor:'documentation'!
  2135 
  2134 
  2136 version
  2135 version
  2137     ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTreeView.st,v 1.67 1998-09-01 13:38:18 tz Exp $'
  2136     ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTreeView.st,v 1.68 1998-10-03 09:03:49 tz Exp $'
  2138 ! !
  2137 ! !