"{ Package: 'stx:goodies/metacello' }"

MetacelloProjectSpecGenerator subclass:#MetacelloConfigurationSpecGenerator
	instanceVariableNames:''
	classVariableNames:''
	poolDictionaries:''
	category:'Metacello-Core-Scripts'
!


!MetacelloConfigurationSpecGenerator methodsFor:'accessing'!

projectSpecCreationBlock
    ^ [ :projectName | {(MetacelloMCProject new configurationOfProjectSpec name: projectName)} ]
!

projectSpecListBlock
    ^ [ MetacelloProjectRegistration configurationProjectSpecs ]
!

projectSpecLookupBlock
    ^ [ :projectName | 
    {(MetacelloProjectRegistration
        projectSpecForClassNamed: (MetacelloScriptEngine configurationNameFrom: projectName)
        ifAbsent: [  ])} ]
! !

!MetacelloConfigurationSpecGenerator class methodsFor:'documentation'!

version_SVN
    ^ '$Id::                                                                                                                        $'
! !