[Pkg] The Trunk: Monticello-bf.451.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Apr 6 07:17:31 UTC 2011


Bert Freudenberg uploaded a new version of Monticello to project The Trunk:
http://source.squeak.org/trunk/Monticello-bf.451.mcz

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

Name: Monticello-bf.451
Author: bf
Time: 6 April 2011, 9:17:11.797 am
UUID: 7fabed94-b2be-463a-b3ae-f368fada85c9
Ancestors: Monticello-cmm.450

- cmm.450 breaks reading configurations, reverting  MCFileBasedRepository>>versionReaderForFileNamed:do:

=============== Diff against Monticello-cmm.450 ===============

Item was changed:
  ----- Method: MCFileBasedRepository>>versionReaderForFileNamed:do: (in category 'private-files') -----
+ versionReaderForFileNamed: aString do: aBlock
- versionReaderForFileNamed: aString do: aBlock 
- 	| fileName |
- 	fileName := (#('mcz' 'mcd' )
- 					anySatisfy: [:eachExtension | aString endsWith: eachExtension])
- 				ifTrue: [aString]
- 				ifFalse: [aString , '.mcz'].
  	^ self
+ 		readStreamForFileNamed: aString
+ 		do: [:s |
+ 			(MCVersionReader readerClassForFileNamed: aString) ifNotNil:
+ 				[:class | aBlock value: (class on: s fileName: aString)]]
+ !
- 		readStreamForFileNamed: fileName
- 		do: [:s | (MCVersionReader readerClassForFileNamed: fileName)
- 				ifNotNil: [:class | aBlock
- 						value: (class on: s fileName: fileName)]]!



More information about the Packages mailing list