X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FOyster.git;a=blobdiff_plain;f=lib%2FOyster%2FProvision%2FRackspace.pm;h=ed14944828d06c4e63640ab145054e07346848d6;hp=61e89771b1598b9645346af02aaf10fc5059b136;hb=a9e65ceef2ae9d568156215f278436c53fd2a80d;hpb=3f4fb5441a2522643af82bdad982603447231fe1 diff --git a/lib/Oyster/Provision/Rackspace.pm b/lib/Oyster/Provision/Rackspace.pm index 61e8977..ed14944 100644 --- a/lib/Oyster/Provision/Rackspace.pm +++ b/lib/Oyster/Provision/Rackspace.pm @@ -9,13 +9,15 @@ requires 'config'; has 'api_username' => ( is => 'ro', isa => 'Str', required => 1, lazy_build => 1); sub _build_api_username { return $ENV{CLOUDSERVERS_USER} if exists $ENV{CLOUDSERVERS_USER}; - die "Need api_username or CLOUDSERVERS_USER in environment"; + return $self->config->{api_username} + or die "Need api_username or CLOUDSERVERS_USER in environment"; } has 'api_password' => ( is => 'ro', isa => 'Str', required => 1, lazy_build => 1); sub _build_api_password { return $ENV{CLOUDSERVERS_KEY} if exists $ENV{CLOUDSERVERS_KEY}; - die "Need api_password or CLOUDSERVERS_KEY in environment"; + return $self->config->{api_password} + or die "Need api_password or CLOUDSERVERS_KEY in environment"; } has '_rs' => ( is => 'rw', isa => 'Net::RackSpace::CloudServers', default => sub {