A new version of Installer-Core was added to project Installer: http://www.squeaksource.com/Installer/Installer-Core-kph.223.mcz
==================== Summary ====================
Name: Installer-Core-kph.223 Author: kph Time: 16 September 2008, 11:40:46 pm UUID: b40fa3cb-9010-4b6a-8df4-3771bf03dea4 Ancestors: Installer-Core-kph.222
Fix to load mcm's from a repository. Thanks to David Schaffer
=============== Diff against Installer-Core-kph.222 ===============
Item was changed: ----- Method: Installer>>mcThing (in category 'monticello') ----- mcThing
| loader files fileToLoad version count |
loader := self classMCVersionLoader new. 1 to: self packages size do: [ :n |
self logCR: 'finding ', self package asString, '...'. "several attempts to read files - repository readableFileNames sometimes fails" count := 0. fileToLoad := nil. [count := count + 1. (fileToLoad = nil) and:[ count < 5 ] ] whileTrue: [ files := mc readableFileNames asSortedCollection: self mcSortFileBlock. fileToLoad := files detect: self mcDetectFileBlock ifNone: [ nil ]. ].
version := mc versionFromFileNamed: fileToLoad. + (version isKindOf: MCConfiguration) + ifTrue: [^version] + ifFalse:[version workingCopy repositoryGroup addRepository: mc]. - (version isKindOf: MCConfiguration) ifFalse:[ - version workingCopy repositoryGroup addRepository: mc]. self log: ' found ', version fileName, '...'.
loader addVersion: version.
packages removeFirst. ].
+ ^ loader! - ^ loader - !
packages@lists.squeakfoundation.org