[Pkg] Monticello Public: MonticelloConfigurations-djr.48.mcz

squeaksource-noreply at iam.unibe.ch squeaksource-noreply at iam.unibe.ch
Tue Jul 1 14:59:34 UTC 2008


A new version of MonticelloConfigurations was added to project Monticello Public:
http://www.squeaksource.com/mc/MonticelloConfigurations-djr.48.mcz

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

Name: MonticelloConfigurations-djr.48
Author: djr
Time: 1 July 2008, 4:59:33 pm
UUID: 50d1ce4b-0c41-46eb-91d4-9045d9c75842
Ancestors: MonticelloConfigurations-mtf.47

Continuing my quest for using configurations on the filesystem: Check if the map contains a relative path to a repository and construct one based on that, rather than defaulting to an HTTP one.

=============== Diff against MonticelloConfigurations-mtf.47 ===============

Item was changed:
  ----- Method: MCConfiguration class>>repositoryFromArray: (in category 'converting') -----
+ repositoryFromArray: anArray 
- repositoryFromArray: anArray
  	^ MCRepositoryGroup default repositories
  		detect: [:repo | repo description = anArray first]
+ 		ifNone: [(self seeIfRelativeDirectory: anArray first)
+ 				ifNil: [MCHttpRepository
+ 						location: anArray first
+ 						user: ''
+ 						password: '']]!
- 		ifNone: [
- 			MCHttpRepository
- 				location: anArray first
- 				user: ''
- 				password: '']!

Item was added:
+ ----- Method: MCConfiguration class>>seeIfRelativeDirectory: (in category 'converting') -----
+ seeIfRelativeDirectory: aPath 
+ 	| possiblePath |
+ 	possiblePath := FileDirectory
+ 				on: (FileDirectory default fullNameFor: aPath).
+ 	^ possiblePath exists
+ 		ifTrue: [MCDirectoryRepository new directory: possiblePath]
+ 		ifFalse: [ nil ]!



More information about the Packages mailing list