[squeak-dev] The Trunk: MonticelloConfigurations-cmm.92.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Apr 25 00:17:23 UTC 2011


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

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

Name: MonticelloConfigurations-cmm.92
Author: cmm
Time: 24 April 2011, 7:17:13.976 pm
UUID: 7879c8ca-fa9b-44e2-b37f-be2918404a61
Ancestors: MonticelloConfigurations-cmm.91

- Extend support for MCConfigurations to regular MCDirectoryRepository's.

=============== Diff against MonticelloConfigurations-cmm.91 ===============

Item was changed:
  ----- Method: MCConfigurationBrowser>>addRepository (in category 'repositories') -----
  addRepository
+ 	(self pickRepositorySatisfying:
+ 		[ : ea | (self repositories includes: ea) not ]) ifNotNil:
+ 		[ : repo | repo class supportsConfigurations ifFalse: [ ^ self inform: 'Not all of these repositories support MCConfigurations.' ].
+ 		self repositories add: repo.
+ 		self changed: #repositoryList ]!
- 	(self pickRepositorySatisfying: [:ea | (self repositories includes: ea) not])
- 		ifNotNil: [:repo |
- 			(repo isKindOf: MCHttpRepository)
- 				ifFalse: [^self inform: 'Only HTTP repositories are supported'].
- 			self repositories add: repo.
- 			self changed: #repositoryList.
- 		]!

Item was changed:
  ----- Method: MCConfigurationBrowser>>checkRepositories (in category 'repositories') -----
  checkRepositories
  	| bad |
+ 	bad := self repositories reject: [:repo | repo class supportsConfigurations ].
- 	bad := self repositories reject: [:repo | repo isKindOf: MCHttpRepository].
  	^bad isEmpty or: [
  		self selectRepository: bad first.
  		self inform: (String streamContents: [:strm |
  			strm nextPutAll: 'Please remove these repositories:'; cr.
  			bad do: [:r | strm nextPutAll: r description; cr].
  			strm nextPutAll: '(only HTTP repositories are supported)']).
  		false].
  !

Item was added:
+ ----- Method: MCFileBasedRepository class>>supportsConfigurations (in category '*monticelloconfigurations') -----
+ supportsConfigurations
+ 	^ true!

Item was added:
+ ----- Method: MCMagmaRepository class>>supportsConfigurations (in category '*monticelloconfigurations') -----
+ supportsConfigurations
+ 	^ true!

Item was added:
+ ----- Method: MCRepository class>>supportsConfigurations (in category '*monticelloconfigurations') -----
+ supportsConfigurations
+ 	^ false!




More information about the Squeak-dev mailing list