Bert Freudenberg uploaded a new version of MonticelloConfigurations to project The Trunk: http://source.squeak.org/trunk/MonticelloConfigurations-bf.99.mcz
==================== Summary ====================
Name: MonticelloConfigurations-bf.99 Author: bf Time: 16 November 2011, 7:33:37.129 pm UUID: 9a92c4ba-fcff-4dd8-968a-b17fc99c98c0 Ancestors: MonticelloConfigurations-dtl.98
- individual working copies should not use the default repository group but have their own - enforce for packages in update map
=============== Diff against MonticelloConfigurations-dtl.98 ===============
Item was changed: ----- Method: MCConfiguration>>depsSatisfying:versionDo:displayingProgress: (in category 'private') ----- depsSatisfying: selectBlock versionDo: verBlock displayingProgress: progressString | count action | count := 0. self repositories do: [ : eachRepository | MCRepositoryGroup default addRepository: eachRepository ]. action := [ : dep | | ver repo | ver := dep versionInfo name. repo := self repositories detect: [ : eachRepository | eachRepository includesVersionNamed: ver ] ifNone: [ self logError: 'Version ' , ver , ' not found in any repository'. self logError: 'Aborting'. ^ count ]. (selectBlock value: dep) ifTrue: [ | new | new := self versionNamed: ver for: dep from: repo. new ifNil: [ self logError: 'Could not download version ' , ver , ' from ' , repo description. self logError: 'Aborting'. ^ count ] ifNotNil: [ self logUpdate: dep package with: new. self class extraProgressInfo ifTrue: [ ProgressNotification signal: '' extra: 'Installing ' , ver ]. verBlock value: new. count := count + 1 ] ]. + dep package workingCopy newRepositoryGroupIfDefault. "fix old working copies" dep package workingCopy repositoryGroup addRepository: repo ]. self class extraProgressInfo ifTrue: [ self dependencies do: action displayingProgress: progressString ] ifFalse: [ self dependencies do: action ]. ^ count!