--- 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!