[p5sagit/Oyster.git] / lib / Oyster / Provision.pm

package Oyster::Provision;

use Moose;

sub config {
    return {provision_backend => 'Oyster::Provision::Rackspace'};
}

sub BUILD {

    my $self = shift;

    my $role = $self->config()->{provision_backend};

    eval "use $role";
    "$role"->meta->apply($self);
}

1;
Commit	Line	Data
3ded6347	1	package Oyster::Provision;
	2
	3	use Moose;
	4
	5	sub config {
	6	return {provision_backend => 'Oyster::Provision::Rackspace'};
	7	}
	8
	9	sub BUILD {
	10
	11	my $self = shift;
	12
	13	my $role = $self->config()->{provision_backend};
	14
1d534f17	15	eval "use $role";
3ded6347	16	"$role"->meta->apply($self);
3ded6347	17	}
c9ecd647	18
c9ecd647	19	1;