Removed the junk

[p5sagit/Oyster.git] / .build / 0ey2IQdAX1 / lib / Dist / Zilla / App / Command / provision.pm

diff --git a/.build/0ey2IQdAX1/lib/Dist/Zilla/App/Command/provision.pm b/.build/0ey2IQdAX1/lib/Dist/Zilla/App/Command/provision.pm
deleted file mode 100644 (file)
index 963f9a5..0000000
--- a/.build/0ey2IQdAX1/lib/Dist/Zilla/App/Command/provision.pm
+++ /dev/null
@@ -1,76 +0,0 @@
-use strict;
-use warnings;
-package Dist::Zilla::App::Command::provision;
-BEGIN {
-  $Dist::Zilla::App::Command::provision::VERSION = '0.1';
-}
-# ABSTRACT: release your dist to the CPAN
-use Dist::Zilla::App -command;
-use Moose;
-use Config::Any;
-
-sub abstract { 'provision a new Oyster VM' }
-
-sub opt_spec {
-  [ 'name=s'     => 'the name of the VM to create' ],
-}
-
-sub execute {
-  my ($self, $opt, $arg) = @_;
-
-  my $zilla = $self->zilla;
-
-  my $name = $opt->name
-    or die "No name provided!";
-  my @config_files = ( './oyster.conf' ); # TODO make configurable
-
-  my $cfg = Config::Any->load_files({ files => \@config_files });
-  ($cfg) = values %{ $cfg->[0] }; # FIX with ::JFDI or similar
-
-  my $Provision = $cfg->{Provision} or die "No <Provision> section";
-  my $target = $Provision->{$name}  or die "No section for <Provision> <$name>";
-
-  my $type = $target->{type} || 'Rackspace';
-
-  use Oyster::Provision;
-  my $server = Oyster::Provision->new(
-    name              => $name,
-    size              => 1,                              # id 1 - ram 256 MiB - disk 10 GiB
-    image             => 69,                             # id 69 - Ubuntu 10.10 (meerkat)
-    pub_ssh           => "$ENV{HOME}/.ssh/id_rsa.pub",
-    provision_backend => $type,
-  );
-  $server->create;
-  print "Instance $name created! ($server)\n";
-}
-
-1;
-
-__END__
-=pod
-
-=head1 NAME
-
-Dist::Zilla::App::Command::provision - provision a new Oyster VM
-
-=head1 VERSION
-
-version 0.1
-
-=head1 SYNOPSIS
-
-    TODO
-
-=head1 AUTHOR
-
-CONTRIBUTORS
-
-=head1 COPYRIGHT AND LICENSE
-
-This software is copyright (c) 2010 by CONTRIBUTORS
-
-This is free software; you can redistribute it and/or modify it under
-the same terms as the Perl 5 programming language system itself.
-
-=cut
-