--- a/OrderedCollection.st	Wed Apr 02 19:02:29 2003 +0200
+++ b/OrderedCollection.st	Wed Apr 02 19:03:50 2003 +0200
@@ -1156,7 +1156,7 @@
      start  "{ Class:SmallInteger }"
      stop   "{ Class:SmallInteger }" |
 
-    newCollection := self copyEmpty:(self size).
+    newCollection := self copyEmpty.
     stop := lastIndex.
     start := firstIndex.
     start to:stop do:[:index |
@@ -1276,7 +1276,7 @@
      start  "{ Class:SmallInteger }"
      stop   "{ Class:SmallInteger }" |
 
-    newCollection := self copyEmpty:(self size).
+    newCollection := self copyEmpty.
     stop := lastIndex.
     start := firstIndex.
     start to:stop do:[:index |
@@ -1299,7 +1299,7 @@
         100000 timesRepeat:[
             coll select:[:each | each > 5] thenCollect:[:i | i * i]
         ]
-     ]    
+     ]        
 
      |coll|
      coll := #(1 2 3 4 5 6 7 8) asOrderedCollection. 
@@ -1307,7 +1307,7 @@
         100000 timesRepeat:[
             ( coll select:[:each | each > 5]) collect:[:i | i * i]
         ]
-     ]   
+     ]        
     "
 ! !
 
@@ -1907,5 +1907,5 @@
 !OrderedCollection class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/OrderedCollection.st,v 1.84 2003-04-02 17:02:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/OrderedCollection.st,v 1.85 2003-04-02 17:03:50 cg Exp $'
 ! !