--- a/MCRepositoryGroup.st Fri Apr 19 01:49:43 2013 +0200
+++ b/MCRepositoryGroup.st Fri Apr 19 01:51:57 2013 +0200
@@ -92,10 +92,11 @@
!
repositories
- ^ ((OrderedCollection withAll:repositories)
- addFirst:(MCCacheRepository default);
- yourself)
- select: [ :ea | ea isValid ]
+ ^ ((OrderedSet with:MCCacheRepository default)
+ addAll:repositories;
+ yourself)
+ asOrderedCollection
+ select: [ :ea | ea isValid ]
"Modified: / 04-12-2011 / 09:04:42 / cg"
!
@@ -131,5 +132,6 @@
!MCRepositoryGroup class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/goodies/monticello/MCRepositoryGroup.st,v 1.8 2012-09-11 21:14:01 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/goodies/monticello/MCRepositoryGroup.st,v 1.9 2013-04-18 23:51:57 cg Exp $'
! !
+