--- a/Collection.st	Fri Apr 10 16:22:21 2015 +0200
+++ b/Collection.st	Mon Apr 13 16:02:13 2015 +0200
@@ -4089,12 +4089,13 @@
      if aStream is not positionable, create an temporary positionable stream
      (needed for limit calculation)
     "
+    limit := self maxPrint.
     aStream isPositionable ifTrue:[
         s := aStream.
+        limit := s position + limit.
     ] ifFalse:[
         s := WriteStream on:(String uninitializedNew:50).
     ].
-    limit := s position + self maxPrint.
 
     self printElementsDo:[:element |
         firstOne ifFalse:[
@@ -5747,11 +5748,11 @@
 !Collection class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Collection.st,v 1.361 2015-03-28 09:01:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Collection.st,v 1.362 2015-04-13 14:02:13 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Collection.st,v 1.361 2015-03-28 09:01:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Collection.st,v 1.362 2015-04-13 14:02:13 cg Exp $'
 ! !