A new version of Installer-Core was added to project Installer: http://www.squeaksource.com/Installer/Installer-Core-kph.224.mcz
==================== Summary ====================
Name: Installer-Core-kph.224 Author: kph Time: 17 September 2008, 12:04:42 am UUID: 9a666af6-3fbf-4810-ab82-1fdbfb0a0578 Ancestors: Installer-Core-kph.223
Go back to previous idea of calling #load on MCConfiguration. Instead fix #load to use MCVersionLoader.
=============== Diff against Installer-Core-kph.223 ===============
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. + loader addVersion: version]. - ifTrue: [^version] - ifFalse:[version workingCopy repositoryGroup addRepository: mc]. self log: ' found ', version fileName, '...'. - - loader addVersion: version.
packages removeFirst. ].
^ loader!
packages@lists.squeakfoundation.org