TextView.st
changeset 164 5ab02ff0d9ae
parent 132 596439fe4efd
child 174 d80a6cc3f9b2
--- a/TextView.st	Thu Sep 21 13:54:14 1995 +0200
+++ b/TextView.st	Mon Oct 23 21:07:01 1995 +0100
@@ -33,7 +33,7 @@
 COPYRIGHT (c) 1989 by Claus Gittinger
 	     All Rights Reserved
 
-$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.24 1995-07-03 02:34:01 claus Exp $
+$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.25 1995-10-23 20:06:51 cg Exp $
 '!
 
 !TextView class methodsFor:'documentation'!
@@ -54,7 +54,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.24 1995-07-03 02:34:01 claus Exp $
+$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.25 1995-10-23 20:06:51 cg Exp $
 "
 !
 
@@ -1737,6 +1737,8 @@
 	]
     ].
 
+    selectionStartLine isNil ifTrue:[^ self].
+
     (selectionStartCol == 0) ifTrue:[
 	selectionStartCol := 1
     ].