--- a/SequenceableCollection.st	Thu Sep 30 14:36:14 2004 +0200
+++ b/SequenceableCollection.st	Thu Sep 30 14:36:37 2004 +0200
@@ -409,6 +409,12 @@
     "Modified: / 13.11.2001 / 13:49:18 / cg"
 !
 
+collect:aBlock from:startIndex to:stopIndex
+    "squeak uses a different naming here - sigh"
+
+    ^ self from:startIndex to:stopIndex collect:aBlock
+!
+
 copyAfter: anElement
         "Answer a copy of the receiver from after the first occurence
         of anElement up to the end. If no such element exists, answer 
@@ -6606,7 +6612,7 @@
 !SequenceableCollection class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/SequenceableCollection.st,v 1.214 2004-09-22 09:55:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/SequenceableCollection.st,v 1.215 2004-09-30 12:36:37 cg Exp $'
 ! !
 
 SequenceableCollection initialize!