A new version of Monticello was added to project The Inbox:
http://source.squeak.org/inbox/Monticello-mva.667.mcz

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

Name: Monticello-mva.667
Author: mva
Time: 6 April 2017, 8:41:09.494386 pm
UUID: 0075cba1-70ff-4e10-9be6-0c01f85dc85a
Ancestors: Monticello-eem.666

New style diffy version (*.mcd): Prune ancestors version infos in the info of the base of the diff when writing a diffy version. Graft them back from the diff's base version when reading a diffy version unless base info already has ancestors (old-style diffy version with complete version history info) in which case leave them alone.

=============== Diff against Monticello-eem.666 ===============

Item was added:
+ ----- Method: MCMcdReader>>loadVersionInfo (in category 'loading') -----
+ loadVersionInfo
+ 	| baseInfo |
+ 	super loadVersionInfo.
+ 	baseInfo := self baseInfo.
+ 	info graftAncestorsTo: baseInfo from:
+ 		(MCRepositoryGroup default versionWithInfo: baseInfo) info!

Item was added:
+ ----- Method: MCMcdWriter>>writeVersion: (in category 'visiting') -----
+ writeVersion: aVersion
+ 	self writeFormat.
+ 	self writePackage: aVersion package.
+ 	self writeVersionInfo:
+ 		(aVersion info veryDeepCopy
+ 			pruneAncestorsFrom: aVersion baseInfo).
+ 	self writeDefinitions: aVersion.
+ 	aVersion dependencies do: [:ea | self writeVersionDependency: ea]!

Item was added:
+ ----- Method: MCVersionInfo>>ancestors: (in category 'accessing') -----
+ ancestors: anObject
+ 	ancestors := anObject!

Item was added:
+ ----- Method: MCVersionInfo>>graftAncestorsTo:from: (in category 'copying') -----
+ graftAncestorsTo: aBaseVersionInfo from: aVersionInfo
+ 	(self allAncestors select: [:e | e = aBaseVersionInfo])
+ 		do: [:e | e ancestors isEmpty ifTrue: [e ancestors: aVersionInfo ancestors]]!

Item was added:
+ ----- Method: MCVersionInfo>>pruneAncestorsFrom: (in category 'copying') -----
+ pruneAncestorsFrom: aBaseVersionInfo
+ 	(self allAncestors select: [:e | e = aBaseVersionInfo])
+ 		do: [:e | e ancestors: #()]
+ 	
+ !