--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/MCSnapshot.st Wed Nov 22 14:20:01 2006 +0100
@@ -0,0 +1,61 @@
+"{ Package: 'stx:goodies/monticello' }"
+
+Object subclass:#MCSnapshot
+ instanceVariableNames:'definitions'
+ classVariableNames:''
+ poolDictionaries:''
+ category:'Monticello-Base'
+!
+
+
+!MCSnapshot class methodsFor:'as yet unclassified'!
+
+empty
+ ^ self fromDefinitions: #()
+!
+
+fromDefinitions: aCollection
+ ^ self new initializeWithDefinitions: aCollection
+! !
+
+!MCSnapshot methodsFor:'accessing'!
+
+= other
+ ^ definitions asArray = other definitions asArray
+!
+
+definitions
+ ^ definitions
+!
+
+hash
+ ^ definitions asArray hash
+! !
+
+!MCSnapshot methodsFor:'initializing'!
+
+initializeWithDefinitions: aCollection
+ definitions _ aCollection.
+! !
+
+!MCSnapshot methodsFor:'loading'!
+
+install
+ MCPackageLoader installSnapshot: self
+!
+
+updatePackage: aPackage
+ MCPackageLoader updatePackage: aPackage withSnapshot: self
+! !
+
+!MCSnapshot methodsFor:'patching'!
+
+patchRelativeToBase: aSnapshot
+ ^ MCPatch fromBase: aSnapshot target: self
+! !
+
+!MCSnapshot class methodsFor:'documentation'!
+
+version
+ ^ '$Header: /cvs/stx/stx/goodies/monticello/MCSnapshot.st,v 1.1 2006-11-22 13:20:01 cg Exp $'
+! !