--- a/SequenceableCollection.st	Mon Jul 02 19:02:41 2018 +0200
+++ b/SequenceableCollection.st	Mon Jul 02 19:38:57 2018 +0200
@@ -449,7 +449,6 @@
 ! !
 
 
-
 !SequenceableCollection methodsFor:'Compatibility-Squeak'!
 
 allButFirst
@@ -10485,7 +10484,7 @@
     idx1 := firstLine.
     idx2 := lastLine.
     idx1 to:idx2 do:[:lineIndex |
-        lineString := self at:lineIndex.
+        lineString := (self at:lineIndex) asString.
 
         lineString notNil ifTrue:[
             lineString isString ifFalse:[
@@ -10537,7 +10536,7 @@
     "
     pos := 1.
     idx1 to:idx2 do:[:lineIndex |
-        lineString := self at:lineIndex.
+        lineString := (self at:lineIndex) asString.
         thisLen := lineString size.
         thisLen ~~ 0 ifTrue:[
             withEmphasis ifFalse:[
@@ -10696,6 +10695,7 @@
 
     "Created: / 17-06-1998 / 12:30:32 / cg"
     "Modified: / 21-09-2017 / 12:46:43 / stefan"
+    "Modified: / 02-07-2018 / 19:36:58 / Stefan Vogel"
 !
 
 joinWithAll:separatingCollection