File Coverage

lib/MojoX/Route.pm
Criterion Covered Total %
statement 11 12 91.6
branch 1 4 25.0
condition 1 3 33.3
subroutine 3 3 100.0
pod 1 1 100.0
total 17 23 73.9


line stmt bran cond sub pod time code
1             package MojoX::Route;
2 3     3   2832 use Mojo::Base -base;
  3         5  
  3         19  
3              
4 3     3   458 use Scalar::Util 'weaken';
  3         7  
  3         537  
5              
6             has 'app';
7              
8             sub new {
9 11     11 1 18 my $class = shift;
10              
11 11 50 33     22 if (ref $class && $class->isa(__PACKAGE__)) {
12 0 0       0 @_ == 1 ? $_[0]->{app} = $class->{app} : push @_, app => $class->{app};
13             }
14              
15 11         31 my $self = $class->SUPER::new(@_);
16 11         108 weaken $self->{app};
17 11         16 return $self;
18             }
19              
20             1;
21              
22             __END__