#DOCUMENTATION by cg
authorClaus Gittinger <cg@exept.de>
Wed, 29 Aug 2018 09:24:50 +0200
changeset 6412 5ceab4c0d579
parent 6411 04771f75a742
child 6413 cb8f21c7d95b
#DOCUMENTATION by cg class: EditTextView comment/format in: #contentsAsString
EditTextView.st
--- 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