Frank Shearar uploaded a new version of Installer-Core to project The Trunk: http://source.squeak.org/trunk/Installer-Core-fbs.368.mcz
==================== Summary ====================
Name: Installer-Core-fbs.368 Author: fbs Time: 29 April 2013, 10:27:50.682 pm UUID: f9e8d0c8-bdd3-4130-a3a4-aa96f6567af4 Ancestors: Installer-Core-fbs.367
#sorted: returns a sorted copy of the collection, so don't just throw the copy away.
=============== Diff against Installer-Core-fbs.367 ===============
Item was changed: ----- Method: InstallerMonticello>>mcThing (in category 'monticello') ----- mcThing | loader | loader := self classMCVersionLoader new.
"several attempts to read files - repository readableFileNames sometimes fails" self packages do: [:pkg | | versionNames fileToLoad version | versionNames := mc versionNamesForPackageNamed: (pkg asMCVersionName versionNumber = 0 ifTrue: [ "Just a package name specified, use it whole." pkg ] ifFalse: [pkg asMCVersionName packageName]). + fileToLoad := (versionNames sorted: self mcSortFileBlock) - versionNames sorted: self mcSortFileBlock. - fileToLoad := versionNames detect: (self mcDetectFileBlock: pkg) ifNone: [ nil ]. fileToLoad ifNotNil: [version := mc versionNamed: fileToLoad. (version isKindOf: MCConfiguration) ifTrue: [^ version] ifFalse: [self normalizedRepositories do: [:repo | MCRepositoryGroup default addRepository: repo]. self normalizedRepositories do: [:repo | version workingCopy repositoryGroup addRepository: repo]. loader addVersion: version]. self logCR: ' found ' , version fileName , '...']]. ^ loader!