Issue Metacello#111: directory copy of ConfigurationOfSeaside30...fails

testRepositories/issue111Repository/ConfigurationOfIssue111.package/ConfigurationOfIssue111.class/class/DevelopmentProcess.st

@@ -0,0 +1,24 @@
+development support
+DevelopmentProcess
+
+"DEVELOPMENT Process
+	- load current version:
+	  	(self project version: #stable) load: 'ALL'.
+	- open new version for development:
+		self createNewDevelopmentVersion
+	- update the the development version to match mcz file versions
+		self updateToLatestPackageVersions: '3.0.7 release see http://code.google.com/p/seaside/wiki/Seaside307Changelog'
+	- do development and periodically save mcz files and update configuration
+		self saveModifiedPackages: '- fixed bug xyz'
+	- do development and periodically save mcz files and configuration until ready for release
+		self saveModifiedPackagesAndConfiguration: '- fixed bug xyz'
+	- save configuration
+		self saveConfiguration: commitMessage '- checkpoint configuration'
+RELEASE Process
+	- mark development version as release:
+		self releaseDevelopmentVersion: 'commit comment'
+	- copy configuration for general access for Squeak and Pharo:
+		self copyToSqueakSource.
+	- copy configuration for general access for GLASS (Dale is willing to test and release for GLASS):
+		self copyToGemSource.
+"

testRepositories/issue111Repository/ConfigurationOfIssue111.package/ConfigurationOfIssue111.class/class/compareVersions.st

@@ -0,0 +1,10 @@
+development support
+compareVersions
+	"Compare the current #stable version to current #development version"
+
+	"self compareVersions"
+
+	"Note: you need 1.0-beta.28 or later for the class MetacelloToolBox"
+
+	self ensureMetacello.
+	((Smalltalk at: #MetacelloToolBox) compareVersionsIn: self) inspect

testRepositories/issue111Repository/ConfigurationOfIssue111.package/ConfigurationOfIssue111.class/class/copyToGemSource.st

@@ -0,0 +1,13 @@
+development support
+copyToGemSource
+	"Copy the current configuration mcz file to http://seaside.gemstone.com/ss/MetacelloRepository"
+
+	"Note you before copying config to GemSource, you should have tested the release in GLASS.
+	 You also need to have commit rights to the GemSource repository."
+
+	"self copyToGemSource"
+
+	"Note: you need 1.0-beta.28 or later for the class MetacelloToolBox"
+
+	self ensureMetacello.
+	(Smalltalk at: #MetacelloToolBox) copyConfiguration: self to: 'http://seaside.gemstone.com/ss/MetacelloRepository'

testRepositories/issue111Repository/ConfigurationOfIssue111.package/ConfigurationOfIssue111.class/class/copyToSqueakSource.st

@@ -0,0 +1,10 @@
+development support
+copyToSqueakSource
+	"Copy the current configuration mcz file to http://www.squeaksource.com/MetacelloRepository"
+
+	"self copyToSqueakSource"
+
+	"Note: you need 1.0-beta.28 or later for the class MetacelloToolBox"
+
+	self ensureMetacello.
+	(Smalltalk at: #MetacelloToolBox) copyConfiguration: self to: 'http://www.squeaksource.com/MetacelloRepository'

testRepositories/issue111Repository/ConfigurationOfIssue111.package/ConfigurationOfIssue111.class/class/createNewBaselineVersion.from..st

@@ -0,0 +1,28 @@
+development support
+createNewBaselineVersion: baselineVersionString from: oldBaselineVersionString
+	"Seaside30 baseline is made up from two baseline methods, a commonBaseline and the baseline.
+	 This method creates new baseline methods"
+
+	"self createNewBaselineVersion: '3.0.4-baseline' from: '3.0.3-baseline'"
+
+	"Note: you need 1.0-beta.28 or later for the class MetacelloToolBox"
+
+	| oldBaselineVersion oldCommonBaselineVersion commonBaselineVersionString |
+	self ensureMetacello.
+	oldBaselineVersion := self project version: oldBaselineVersionString.
+	oldCommonBaselineVersion := self project version: oldBaselineVersion importedVersions first.
+	commonBaselineVersionString := baselineVersionString , '-commonBaseline'.
+	(Smalltalk at: #MetacelloToolBox)
+		halt createBaseline: commonBaselineVersionString
+		for: self name asString
+		from: oldCommonBaselineVersion versionString
+		description: ''.
+	(Smalltalk at: #MetacelloToolBox)
+		createBaseline: baselineVersionString
+		for: self name asString
+		from: oldBaselineVersionString
+		description: ''.
+	((Smalltalk at: #MetacelloToolBox) configurationNamed: self name asString)
+		modifyVersionMethodForVersion: baselineVersionString;
+		imports: {commonBaselineVersionString};
+		commitMethod

testRepositories/issue111Repository/ConfigurationOfIssue111.package/ConfigurationOfIssue111.class/class/createNewBaselineVersion.st

@@ -0,0 +1,15 @@
+development support
+createNewBaselineVersion
+	"Create a new baseline version based upon current version's baseline.
+	 You should create a new baseline if new packages have been added or dependencies have changed."
+
+	"self createNewBaselineVersion"
+
+	"Note: you need 1.0-beta.28 or later for the class MetacelloToolBox"
+
+	| currentVersion existingBaselineVersionString baselineVersionNumber |
+	self ensureMetacello.
+	currentVersion := self project currentVersion.
+	existingBaselineVersionString := currentVersion importedVersions first.
+	baselineVersionNumber := existingBaselineVersionString asMetacelloVersionNumber incrementMinorVersionNumber.
+	self createNewBaselineVersion: baselineVersionNumber versionString from: existingBaselineVersionString

testRepositories/issue111Repository/ConfigurationOfIssue111.package/ConfigurationOfIssue111.class/class/createNewDevelopmentVersion.st

@@ -0,0 +1,10 @@
+development support
+createNewDevelopmentVersion
+	"self createNewDevelopmentVersion"
+
+	"Create a new development version using the #stable version as a model"
+
+	"Note: you need 1.0-beta.28 or later for the class MetacelloToolBox"
+
+	self ensureMetacello.
+	(Smalltalk at: #MetacelloToolBox) createNewDevelopmentVersionIn: self description: ''

testRepositories/issue111Repository/ConfigurationOfIssue111.package/ConfigurationOfIssue111.class/class/load.st

@@ -0,0 +1,5 @@
+loading
+load
+	"self load"
+
+	self project latestVersion load

testRepositories/issue111Repository/ConfigurationOfIssue111.package/ConfigurationOfIssue111.class/class/loadLatestVersion.st

@@ -0,0 +1,5 @@
+loading
+loadLatestVersion
+	"self loadLatestVersion"
+
+	^self project latestVersion load

testRepositories/issue111Repository/ConfigurationOfIssue111.package/ConfigurationOfIssue111.class/class/releaseDevelopmentVersion..st

@@ -0,0 +1,10 @@
+development support
+releaseDevelopmentVersion: commitMessage
+	"Release #development version (set version blessing to #release), update the #development and #stable symbolic versions and save the configuration."
+
+	"self releaseDevelopmentVersion: '- release version 1.0.2'"
+
+	"Note: you need 1.0-beta.28 or later for the class MetacelloToolBox"
+
+	self ensureMetacello.
+	(Smalltalk at: #MetacelloToolBox) releaseDevelopmentVersionIn: self description: commitMessage

testRepositories/issue111Repository/ConfigurationOfIssue111.package/ConfigurationOfIssue111.class/class/saveConfiguration..st

@@ -0,0 +1,10 @@
+development support
+saveConfiguration: commitMessage
+	"Save the configuration."
+
+	"self saveConfiguration: '- fixed bug'"
+
+	"Note: you need 1.0-beta.28 or later for the class MetacelloToolBox"
+
+	self ensureMetacello.
+	(Smalltalk at: #MetacelloToolBox) saveConfigurationPackageFor: self name asString description: commitMessage

testRepositories/issue111Repository/ConfigurationOfIssue111.package/ConfigurationOfIssue111.class/class/saveModifiedPackages..st

@@ -0,0 +1,10 @@
+development support
+saveModifiedPackages: commitMessage
+	"Save modified mcz files and update the configuration."
+
+	"self saveModifiedPackages: '- fixed bug'"
+
+	"Note: you need 1.0-beta.28 or later for the class MetacelloToolBox"
+
+	self ensureMetacello.
+	(Smalltalk at: #MetacelloToolBox) saveModifiedPackagesIn: self description:  commitMessage

testRepositories/issue111Repository/ConfigurationOfIssue111.package/ConfigurationOfIssue111.class/class/saveModifiedPackagesAndConfiguration..st

@@ -0,0 +1,10 @@
+development support
+saveModifiedPackagesAndConfiguration: commitMessage
+	"Save modified mcz files, update and then save the configuration."
+
+	"self saveModifiedPackagesAndConfiguration: '- fixed bug'"
+
+	"Note: you need 1.0-beta.28 or later for the class MetacelloToolBox"
+
+	self ensureMetacello.
+	(Smalltalk at: #MetacelloToolBox) saveModifiedPackagesAndConfigurationIn: self description: commitMessage

testRepositories/issue111Repository/ConfigurationOfIssue111.package/ConfigurationOfIssue111.class/class/updateToLatestPackageVersions..st

@@ -0,0 +1,11 @@
+development support
+updateToLatestPackageVersions: descriptionString
+	"Updates mcz file versions in current version"
+
+	"self updateToLatestPackageVersions: ''"
+
+	"Note: you need 1.0-beta.28 or later for the class MetacelloToolBox"
+
+	self ensureMetacello.
+	((Smalltalk at: #MetacelloToolBox) updateToLatestPackageVersionsIn: self description: descriptionString) isEmpty
+		ifTrue: [ self inform: 'All specs up to date' ]

testRepositories/issue111Repository/ConfigurationOfIssue111.package/ConfigurationOfIssue111.class/class/validate.st

@@ -1,4 +1,4 @@
-metacello tool support
+development support
 validate
 	"Check the configuration for Errors, Critical Warnings, and Warnings (see class comment for MetacelloMCVersionValidator for more information). 
 	Errors identify specification issues that will result in unexpected behaviour when you load the configuration.