--- a/MetacelloVersionSpec.st	Wed Sep 05 16:35:54 2012 +0000
+++ b/MetacelloVersionSpec.st	Wed Sep 05 18:56:24 2012 +0000
@@ -2,7 +2,7 @@
 
 MetacelloSpec subclass:#MetacelloVersionSpec
 	instanceVariableNames:'versionString blessing description author timestamp preLoadDoIt
-		postLoadDoIt'
+		postLoadDoIt packages'
 	classVariableNames:''
 	poolDictionaries:''
 	category:'Metacello-Core-Specs'
@@ -80,6 +80,16 @@
 	^timestamp
 !
 
+packages
+
+    packages == nil ifTrue: [ packages := self project packagesSpec ].
+    ^ packages
+!
+
+packages:something
+    packages := something.
+!
+
 postLoadDoIt: anObject
 
 	anObject setPostLoadDoItInMetacelloSpec: self
@@ -154,6 +164,12 @@
     aVersionConstructor descriptionForVersion: aBlockOrString
 !
 
+package: aString constructor: aVersionConstructor
+    aVersionConstructor packageForVersion: aString
+
+    "Created: / 05-09-2012 / 19:17:10 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 postLoadDoIt: aSymbol constructor: aVersionConstructor
     aVersionConstructor postLoadDoItForVersion: aSymbol
 !