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   1357 use 5.010;
  1         4  
6 1     1   6 use utf8;
  1         2  
  1         8  
7              
8 1     1   28 use namespace::autoclean;
  1         3  
  1         6  
9 1     1   108 use Moose::Role;
  1         2  
  1         12  
10              
11 1     1   6696 use MooseX::App::Plugin::Man::Command;
  1         3  
  1         119  
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;