--- a/core/MetacelloErrorInProjectConstructionNotification.st Tue Sep 18 13:11:39 2012 +0000
+++ b/core/MetacelloErrorInProjectConstructionNotification.st Tue Sep 18 18:24:44 2012 +0000
@@ -8,6 +8,42 @@
!
+!MetacelloErrorInProjectConstructionNotification class methodsFor:'instance creation'!
+
+versionString: aString exception: anException
+ ^ self new
+ versionString: aString;
+ exception: anException;
+ signal
+! !
+
+!MetacelloErrorInProjectConstructionNotification methodsFor:'accessing'!
+
+exception
+ ^ exception
+!
+
+exception: anObject
+ exception := anObject
+!
+
+versionString
+ ^ versionString
+!
+
+versionString: anObject
+ versionString := anObject
+! !
+
+!MetacelloErrorInProjectConstructionNotification methodsFor:'exception description'!
+
+defaultAction
+ "Answer false if you want the version recorded in the errorMap.
+ Answer true if you want to go ahead and throw the error"
+
+ ^ false
+! !
+
!MetacelloErrorInProjectConstructionNotification class methodsFor:'documentation'!
version_SVN