File Coverage

blib/lib/MooseX/App/Plugin/Man/Meta/Class.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 19 19 100.0


line stmt bran cond sub pod time code
1             # ============================================================================
2             package MooseX::App::Plugin::Man::Meta::Class;
3             # ============================================================================
4              
5 1     1   1269 use 5.010;
  1         3  
6 1     1   3 use utf8;
  1         2  
  1         7  
7              
8 1     1   18 use namespace::autoclean;
  1         1  
  1         7  
9 1     1   65 use Moose::Role;
  1         2  
  1         5  
10              
11 1     1   3615 use MooseX::App::Plugin::Man::Command;
  1         2  
  1         83  
12              
13             around '_build_app_commands' => sub {
14             my $orig = shift;
15             my $self = shift;
16              
17             my $return = $self->$orig(@_);
18             $return->{man} ||= 'MooseX::App::Plugin::Man::Command';
19              
20             return $return;
21             };
22              
23             1;