[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