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