TextView.st
changeset 2740 892dfb6b0da1
parent 2735 5ba2010aefa4
child 2744 cb920467a4b4
equal deleted inserted replaced
2739:199c79b11aa9 2740:892dfb6b0da1
  2137     end := endVisLineNr.
  2137     end := endVisLineNr.
  2138     (end > nLinesShown) ifTrue:[
  2138     (end > nLinesShown) ifTrue:[
  2139         end := nLinesShown
  2139         end := nLinesShown
  2140     ].
  2140     ].
  2141 
  2141 
  2142 "/    selectionEndLine isNil ifTrue:[
  2142     selectionEndLine isNil ifTrue:[
  2143 "/        selectionStartLine := nil
  2143         selectionStartLine := nil
  2144 "/    ].
  2144     ].
  2145 
  2145 
  2146     selectionStartLine isNil ifTrue:[
  2146     selectionStartLine isNil ifTrue:[
  2147         specialCare := false
  2147         specialCare := false
  2148     ] ifFalse:[
  2148     ] ifFalse:[
  2149         startLine := self visibleLineToAbsoluteLine:startVisLineNr.
  2149         startLine := self visibleLineToAbsoluteLine:startVisLineNr.
  3615 ! !
  3615 ! !
  3616 
  3616 
  3617 !TextView class methodsFor:'documentation'!
  3617 !TextView class methodsFor:'documentation'!
  3618 
  3618 
  3619 version
  3619 version
  3620     ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.200 2003-04-22 13:10:30 penk Exp $'
  3620     ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.201 2003-05-02 17:52:15 cg Exp $'
  3621 ! !
  3621 ! !
  3622 
  3622 
  3623 TextView initialize!
  3623 TextView initialize!