[squeak-dev] The Trunk: Installer-Core-cmm.371.mcz

commits at source.squeak.org commits at source.squeak.org
Wed May 8 01:00:07 UTC 2013


Chris Muller uploaded a new version of Installer-Core to project The Trunk:
http://source.squeak.org/trunk/Installer-Core-cmm.371.mcz

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

Name: Installer-Core-cmm.371
Author: cmm
Time: 7 May 2013, 7:59:48.102 pm
UUID: e4d9f113-0d1d-439b-a64f-6682f58c5837
Ancestors: Installer-Core-cmm.370

- Fix.

=============== Diff against Installer-Core-cmm.370 ===============

Item was changed:
  ----- Method: InstallerMonticello>>project: (in category 'accessing') -----
  project: name
+ 
- 	| locs dirs all |
  	project := name.
  	packages := nil.
+ 	
+ 	(mc respondsTo: #location:) ifTrue:[ mc := mc copy location: root , name ].
+ 	(mc respondsTo: #directory:) ifTrue: [ mc := mc copy directory: root ,'/', name ].
- 	"mc repositories is a collection of repositories created on the fly. Store a reference to it so we have a stable working set."
- 	all := mc repositories.
- 	"Some repositories point to more specific parts within their structures when given a project name. An HTTP repository adds the project name to its path, for instance. A cache repository, despite being directory based, does not."
- 	locs := all select: [:repo | repo respondsTo: #location:].
- 	dirs := all select: [:repo | (repo respondsTo: #directory:) and: [(repo respondsTo: #cacheForPackage:) not]].
- 	locs do: [:repo |
- 		mc removeRepository: repo.
- 		mc addRepository: (repo copy location: root , name)].
- 	dirs do: [:repo |
- 		mc removeRepository: repo.
- 		mc addRepository: (repo copy directory: root , FileDirectory slash , name)].
  		
  	^self copy.!



More information about the Squeak-dev mailing list