[squeak-dev] The Trunk: MonticelloConfigurations-cmm.87.mcz
commits at source.squeak.org
commits at source.squeak.org
Tue Mar 15 19:15:29 UTC 2011
Chris Muller uploaded a new version of MonticelloConfigurations to project The Trunk:
http://source.squeak.org/trunk/MonticelloConfigurations-cmm.87.mcz
==================== Summary ====================
Name: MonticelloConfigurations-cmm.87
Author: cmm
Time: 5 March 2011, 5:23:19.464 pm
UUID: 1dc3af6b-1e80-46f5-890b-af2e13f1d4c3
Ancestors: MonticelloConfigurations-cmm.86
- Fixed calculation of the fileName from a MCVersionName.
=============== Diff against MonticelloConfigurations-cmm.86 ===============
Item was changed:
----- Method: MCConfiguration>>versionNamed:for:from: (in category 'private') -----
versionNamed: aMCVersionName for: aDependency from: repo
| baseName fileName ver |
(repo filterFileNames: repo cachedFileNames forVersionNamed: aMCVersionName) ifNotEmptyDo: [:cachedNames |
fileName := cachedNames anyOne.
self class extraProgressInfo
ifTrue:[ProgressNotification signal: '' extra: 'Using cached ', fileName].
ver := repo versionFromFileNamed: fileName].
ver ifNil: [
baseName := self diffBaseFor: aDependency.
(baseName notNil and: [baseName ~= aMCVersionName and: [repo includesVersionNamed: baseName]]) ifTrue: [
fileName := (MCDiffyVersion nameForVer: aMCVersionName base: baseName), '.mcd'.
self class extraProgressInfo
ifTrue:[ProgressNotification signal: '' extra: 'Downloading ', fileName].
ver := repo versionFromFileNamed: fileName]].
ver ifNil: [
+ fileName := aMCVersionName versionName, '.mcz'.
- fileName := aMCVersionName, '.mcz'.
self class extraProgressInfo
ifTrue:[ProgressNotification signal: '' extra: 'Downloading ', fileName].
ver := repo versionFromFileNamed: fileName].
^ver!
More information about the Squeak-dev
mailing list
|