File Coverage

blib/lib/Dist/Zilla/App/Command/mbd_build.pm

Criterion	Covered	Total	%
statement	10	12	83.3
branch			n/a
condition			n/a
subroutine	4	4	100.0
pod			n/a
total	14	16	87.5

package Dist::Zilla::App::Command::mbd_build;

use strict;
use warnings;
use v5.10;
use Dist::Zilla::App -command;

# ABSTRACT: run Module::Build::Database commands
our $VERSION = '0.05'; # VERSION


sub abstract { 'run Module::Build::Database commands' }

sub opt_spec {
  ([ 'in=s' => 'the directory in which to build the distribution' ])
}

sub execute
{
  my($self, $opt, $args) = @_;

  my($plugin) = grep { $_->isa('Dist::Zilla::Plugin::ModuleBuildDatabase') } @{ $self->zilla->plugins };

  unless(defined $plugin)
  {
    $self->log_fatal("MUST use [ModuleBuildDatabase] for this command");
  }

  $plugin->mbd_build($opt, $args);
}

1;


__END__
=pod

=head1 NAME

Dist::Zilla::App::Command::mbd_build - run Module::Build::Database commands

=head1 VERSION

version 0.05

=head1 SYNOPSIS

 % dzil mbd_build dbtest
 % dzil mbd_build dbdist
 % dzil mbd_build dbfakeinstall
 % dzil mbd_build dbinstall

=head1 DESCRIPTION

After building the distribution, run the given C<Build> command.
The results to the db directory are then copied back into your
working copy so they can be checked into your version control.

=head1 AUTHOR

Graham Ollis <[e-mail]>

=head1 COPYRIGHT AND LICENSE

This software is copyright (c) 2013 by NASA GSFC.

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