Configurable config file
Marco Fontani [Sat, 4 Dec 2010 13:53:39 +0000 (13:53 +0000)]
lib/Dist/Zilla/App/Command/provision.pm

index 9bc0ff9..68fe099 100644 (file)
@@ -16,6 +16,7 @@ sub abstract { 'provision a new Oyster VM' }
 
 sub opt_spec {
   [ 'name=s'     => 'the name of the VM to create' ],
+  [ 'config=s'   => 'the name of the config file to use, default ./oyster.conf' ],
 }
 
 sub execute {
@@ -25,7 +26,7 @@ sub execute {
 
   my $name = $opt->name
     or die "No name provided!";
-  my @config_files = ( './oyster.conf' ); # TODO make configurable
+  my @config_files = ($opt->name or './oyster.conf');
 
   my $cfg = Config::Any->load_files({ files => \@config_files, use_ext => 0 });
   ($cfg) = values %{ $cfg->[0] }; # FIX with ::JFDI or similar