--- a/Collection.st	Tue Feb 25 11:17:54 2003 +0100
+++ b/Collection.st	Tue Feb 25 12:48:02 2003 +0100
@@ -2041,7 +2041,7 @@
     ] ifFalse:[
         s := WriteStream on:(String new:50).
     ].
-    limit := s position + self maxPrint.
+    limit := s position1Based + self maxPrint.
 
     self printElementsDo:[:element |
         firstOne ifFalse:[
@@ -2049,7 +2049,7 @@
         ] ifTrue:[
             firstOne := false
         ].
-        (s position >= limit) ifTrue:[
+        (s position1Based >= limit) ifTrue:[
             s ~~ aStream ifTrue:[
                 aStream nextPutAll:(s contents).
             ].
@@ -2484,7 +2484,7 @@
 !Collection class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Collection.st,v 1.134 2003-02-07 09:51:37 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Collection.st,v 1.135 2003-02-25 11:47:47 cg Exp $'
 ! !
 
 Collection initialize!