File Coverage

blib/lib/OTRS/OPM/Maker/Command/dbtest.pm
Criterion Covered Total %
statement 14 14 100.0
branch 2 2 100.0
condition 12 12 100.0
subroutine 7 7 100.0
pod 4 4 100.0
total 39 39 100.0


line stmt bran cond sub pod time code
1             package OTRS::OPM::Maker::Command::dbtest;
2             $OTRS::OPM::Maker::Command::dbtest::VERSION = '0.19';
3             # ABSTRACT: Test db definitions in .sopm files
4              
5 13     13   10935 use strict;
  13         30  
  13         457  
6 13     13   101 use warnings;
  13         30  
  13         446  
7              
8 13     13   528 use OTRS::OPM::Maker -command;
  13         28  
  13         109  
9              
10             sub abstract {
11 1     1 1 3497 return "Check if DatabaseInstall and DatabaseUninstall sections in the .sopm are correct";
12             }
13              
14             sub usage_desc {
15 1     1 1 2057 return "opmbuild dbtest ";
16             }
17              
18             sub validate_args {
19 8     8 1 9421 my ($self, $opt, $args) = @_;
20              
21 8 100 100     147 $self->usage_error( 'need path to .sopm' ) if
      100        
      100        
      100        
22             !$args or
23             'ARRAY' ne ref $args or
24             !defined $args->[0] or
25             $args->[0] !~ /\.sopm\z/ or
26             !-f $args->[0];
27             }
28              
29             sub execute {
30 1     1 1 787 my ($self, $opt, $args) = @_;
31             }
32              
33             1;
34              
35             __END__