"{ Package: 'stx:goodies/metacello/core' }"
Notification subclass:#MetacelloErrorInProjectConstructionNotification
instanceVariableNames:'versionString exception'
classVariableNames:''
poolDictionaries:''
category:'Metacello-Core-Exceptions-Notifications'
!
!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
^ '$Id:: $'
! !