File Coverage

blib/lib/Shipwright/Script/Create.pm
Criterion Covered Total %
statement 15 20 75.0
branch n/a
condition n/a
subroutine 5 7 71.4
pod 0 2 0.0
total 20 29 68.9


line stmt bran cond sub pod time code
1             package Shipwright::Script::Create;
2              
3 1     1   1101 use strict;
  1         2  
  1         37  
4 1     1   5 use warnings;
  1         1  
  1         35  
5              
6 1     1   5 use base qw/App::CLI::Command Shipwright::Script/;
  1         1  
  1         475  
7              
8 1     1   3330 use Shipwright;
  1         3  
  1         12  
9 1     1   21 use Shipwright::Util;
  1         2  
  1         139  
10              
11             __PACKAGE__->mk_accessors('force');
12              
13             sub options {
14 0     0 0   ( 'f|force' => 'force' );
15             }
16              
17             sub run {
18 0     0 0   my $self = shift;
19              
20 0           my $shipwright = Shipwright->new( repository => $self->repository, );
21 0           $shipwright->backend->initialize();
22 0           $self->log->fatal( 'successfully created' );
23             }
24              
25             1;
26              
27             __END__