ListView.st
changeset 6566 d6f3fa447336
parent 6557 2a3d7695ee4b
child 6575 f0d5fbcbace8
--- a/ListView.st	Fri Mar 22 14:29:46 2019 +0100
+++ b/ListView.st	Sun Mar 24 10:01:01 2019 +0100
@@ -1528,20 +1528,21 @@
 
     len := col2 - col1 + 1.
     list notNil ifTrue:[
-	line := self listAt:lineNr.
-	line notNil ifTrue:[
-	    (line size >= col1) ifTrue:[
-		s := line copyFrom:col1.
-		s size < len ifTrue:[
-		    ^ s paddedTo:len
-		].
-		^ s copyTo:len
-	    ]
-	]
+        line := self listAt:lineNr.
+        line notNil ifTrue:[
+            (line size >= col1) ifTrue:[
+                s := line copyFrom:col1.
+                s size < len ifTrue:[
+                    ^ s paddedTo:len
+                ].
+                ^ s copyTo:len
+            ]
+        ]
     ].
-    ^ String new:len withAll:Character space
-
-    "Created: 7.1.1997 / 19:58:43 / cg"
+    ^ String new:len
+
+    "Created: / 07-01-1997 / 19:58:43 / cg"
+    "Modified: / 24-03-2019 / 09:58:11 / Claus Gittinger"
 !
 
 textFromCharacterPosition:charPos1 to:charPos2