[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