--- 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