Collection.st
changeset 13699 478de3b32a97
parent 13698 7e2f88e84460
child 13741 cc55df8d23dc
--- a/Collection.st	Wed Sep 14 16:30:31 2011 +0200
+++ b/Collection.st	Wed Sep 14 18:40:49 2011 +0200
@@ -355,6 +355,12 @@
 
 !Collection methodsFor:'Compatibility-Squeak'!
 
+, aCollection
+    ^ self copy addAll: aCollection; yourself
+
+    "Created: / 14-09-2011 / 16:32:06 / cg"
+!
+
 addIfNotPresent:anObject
     "Include anObject as one of the receiver's elements, but only if there
     is no such element already. Anwser anObject."
@@ -4103,8 +4109,12 @@
 
 !Collection class methodsFor:'documentation'!
 
+version
+    ^ '$Header: /cvs/stx/stx/libbasic/Collection.st,v 1.265 2011-09-14 16:40:49 cg Exp $'
+!
+
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Collection.st,v 1.264 2011-09-14 14:30:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Collection.st,v 1.265 2011-09-14 16:40:49 cg Exp $'
 ! !
 
 Collection initialize!