[squeak-dev] The Inbox: Installer-Core-cmm.349.mcz
commits at source.squeak.org
commits at source.squeak.org
Wed Apr 6 18:07:05 UTC 2011
A new version of Installer-Core was added to project The Inbox:
http://source.squeak.org/inbox/Installer-Core-cmm.349.mcz
==================== Summary ====================
Name: Installer-Core-cmm.349
Author: cmm
Time: 6 April 2011, 1:06:56.486 pm
UUID: 15cf46e5-c67f-4751-ad8b-b57c3c3fdfd8
Ancestors: Installer-Core-cmm.348
Sort using the old mcSortFileBlock to restore the legacy behavior.
=============== Diff against Installer-Core-cmm.348 ===============
Item was changed:
----- Method: InstallerMonticello>>mcThing (in category 'monticello') -----
mcThing
| loader |
loader := self classMCVersionLoader new.
self logCR: 'reading ' , mc description , '...'.
"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]).
+ versionNames sort: self mcSortFileBlock.
fileToLoad := versionNames
detect: (self mcDetectFileBlock: pkg)
ifNone: [ nil ].
fileToLoad
ifNotNil: [version := mc versionNamed: fileToLoad.
(version isKindOf: MCConfiguration)
ifTrue: [^ version]
ifFalse: [MCRepositoryGroup default addRepository: self normalizedRepository.
version workingCopy repositoryGroup addRepository: self normalizedRepository.
loader addVersion: version].
self logCR: ' found ' , version fileName , '...']].
^ loader!
More information about the Squeak-dev
mailing list
|