--- a/TextView.st Fri Mar 24 10:30:27 2006 +0100
+++ b/TextView.st Mon Mar 27 19:09:25 2006 +0200
@@ -1516,9 +1516,14 @@
to:((selectionEndCol max:oldEndCol) max:1)
]
] ifFalse:[
- selectionStartLine notNil ifTrue:[
- self redrawFromLine:(oldEndLine min:selectionEndLine)
- to:(oldEndLine max:selectionEndLine)
+ selectionEndLine isNil ifTrue:[
+ selectionStartLine := nil.
+ self redraw.
+ ] ifFalse:[
+ (selectionStartLine notNil) ifTrue:[
+ self redrawFromLine:(oldEndLine min:selectionEndLine)
+ to:(oldEndLine max:selectionEndLine)
+ ]
]
].
clickLine := movedLine.
@@ -3866,7 +3871,7 @@
!TextView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.263 2006-03-13 11:32:31 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.264 2006-03-27 17:09:25 cg Exp $'
! !
TextView initialize!