The Trunk: MonticelloConfigurations-bf.105.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: MonticelloConfigurations-bf.105.mcz

commits-2
Bert Freudenberg uploaded a new version of MonticelloConfigurations to project The Trunk:
http://source.squeak.org/trunk/MonticelloConfigurations-bf.105.mcz

==================== Summary ====================

Name: MonticelloConfigurations-bf.105
Author: bf
Time: 5 July 2012, 3:07:18.328 pm
UUID: 5cfbc597-c2d8-45e7-966e-cd8465385785
Ancestors: MonticelloConfigurations-bf.104

Ignore errors when asking server for fast diffs.

=============== Diff against MonticelloConfigurations-bf.104 ===============

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 versionNamed: 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 versionNamed: fileName] ifError: []]].
- ver := repo versionNamed: fileName]].
  ver ifNil: [
  fileName := aMCVersionName versionName, '.mcz'.
  self class extraProgressInfo
  ifTrue:[ProgressNotification signal: '' extra: 'Downloading ', fileName].
  ver := repo versionNamed: fileName].
  ^ver!