author | Claus Gittinger <cg@exept.de> |
Wed, 29 Aug 2018 09:24:50 +0200 | |
changeset 6412 | 5ceab4c0d579 |
parent 6411 | 04771f75a742 |
child 6413 | cb8f21c7d95b |
EditTextView.st | file | annotate | diff | comparison | revisions |
--- a/EditTextView.st Wed Aug 29 09:10:34 2018 +0200 +++ b/EditTextView.st Wed Aug 29 09:24:50 2018 +0200 @@ -1439,9 +1439,13 @@ list isNil ifTrue:[^ '']. self removeTrailingBlankLines. - ^ (list collect:[:each | each isNil ifTrue:[''] - ifFalse:[each string] - ]) asStringWithCRs + ^ (list collect:[:each | + each isNil + ifTrue:[''] + ifFalse:[each string] + ]) asStringWithCRs + + "Modified (format): / 29-08-2018 / 09:24:29 / Claus Gittinger" ! contentsAsStringWithTabs