--- a/ConfigurationOf.st	Wed Sep 05 16:35:54 2012 +0000
+++ b/ConfigurationOf.st	Wed Sep 05 18:56:24 2012 +0000
@@ -189,7 +189,9 @@
 !
 
 projectClass
-    ^ MetacelloMCProject
+    ^ MetacelloStXProject
+
+    "Modified: / 05-09-2012 / 18:20:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 versionNumberClass

--- a/MetacelloProject.st	Wed Sep 05 16:35:54 2012 +0000
+++ b/MetacelloProject.st	Wed Sep 05 18:56:24 2012 +0000
@@ -259,6 +259,28 @@
 	loaderClass := aMetacelloSpecLoader
 !
 
+packageSpec
+
+        ^self packageSpecClass for: self
+
+    "Created: / 05-09-2012 / 19:23:54 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+packageSpecClass
+
+    "JV@2012-09-05: Should be
+
+    ^MetacelloPackageSpec
+
+    but MetacelloPackageSpec belongs to MetacelloMC. I would suggest to
+    create MetacelloPackageSpec in MetacelloCore and add MetacelloMCPackageSpec
+    to MetacelloMC to keep it consistent"
+
+    self subclassResponsibility
+
+    "Created: / 05-09-2012 / 19:26:11 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 packagesSpec
 
 	^self packagesSpecClass for: self

--- 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
 !

--- a/metacello.rc	Wed Sep 05 16:35:54 2012 +0000
+++ b/metacello.rc	Wed Sep 05 18:56:24 2012 +0000
@@ -25,7 +25,7 @@
       VALUE "LegalCopyright", "Copyright Claus Gittinger 1988-2012\nCopyright eXept Software AG 1998-2012\0"
       VALUE "ProductName", "Smalltalk/X\0"
       VALUE "ProductVersion", "6.2.3.1\0"
-      VALUE "ProductDate", "Wed, 05 Sep 2012 16:34:42 GMT\0"
+      VALUE "ProductDate", "Wed, 05 Sep 2012 18:56:18 GMT\0"
     END
 
   END

--- a/stx_goodies_metacello.st	Wed Sep 05 16:35:54 2012 +0000
+++ b/stx_goodies_metacello.st	Wed Sep 05 18:56:24 2012 +0000
@@ -277,7 +277,7 @@
     "Return a SVN revision number of myself.
      This number is updated after a commit"
 
-    ^ "$SVN-Revision:"'2               '"$"
+    ^ "$SVN-Revision:"'6               '"$"
 ! !
 
 !stx_goodies_metacello class methodsFor:'documentation'!