TextView.st
changeset 2419 2ae3350454bc
parent 2415 188fc1577a8d
child 2420 2feaeecc1e43
--- a/TextView.st	Tue Oct 02 18:43:53 2001 +0200
+++ b/TextView.st	Tue Oct 02 19:43:11 2001 +0200
@@ -3141,7 +3141,7 @@
     |sel s|
 
     (sel := self selection) isNil ifTrue:[^ nil].
-     sel := sel collect:[:each| each isNil ifTrue:[nil] ifFalse:[each string]].
+    sel := sel collect:[:each| each isNil ifTrue:[nil] ifFalse:[each string]].
     ^ (sel asStringWithCRsFrom:1 to:(sel size) compressTabs:false withCR:false) string
 !
 
@@ -3224,5 +3224,5 @@
 !TextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.168 2001-09-28 14:28:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.169 2001-10-02 17:43:11 cg Exp $'
 ! !