Forge Monticello ancestry when exporting .mcz
Generate ancestry based in Mercurial history and individual
package's splice maps.
--- a/stx_goodies_petitparser.st Tue Sep 08 02:49:45 2015 +0100
+++ b/stx_goodies_petitparser.st Tue Sep 08 03:20:10 2015 +0100
@@ -347,16 +347,16 @@
Stdout nextPutAll: 'Exporting '; nextPutLine: pkgnm.
mcpkg := MCPackage named: pkgnm.
- mcwc := mcpkg workingCopy.
+ mcwc := mcpkg workingCopy.
mcvi := HGMCVersionInfo forPackage: pkgnm.
- mcvi message: message.
+ mcvi message: message.
[
mcversion := mcwc newVersion.
- mcversion snapshot includeExtrasForSTX: false.
+ mcversion snapshot options includeExtrasForSTX: false.
] on: MCVersionNameAndMessageRequest do:[:ex |
ex resume: (Array with: mcvi name with: message)
].
- mcversion info: mcvi.
+ mcversion info: mcvi.
mcrepo storeVersion: mcversion.
].
@@ -368,7 +368,7 @@
"
"Created: / 04-10-2014 / 21:30:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 03-06-2015 / 08:06:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 08-09-2015 / 00:20:22 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
!stx_goodies_petitparser class methodsFor:'documentation'!