File Coverage

blib/lib/Catalyst/Plugin/Geography.pm
Criterion Covered Total %
statement 4 6 66.6
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 6 8 75.0


line stmt bran cond sub pod time code
1             package Catalyst::Plugin::Geography;
2              
3 1     1   872 use strict;
  1         2  
  1         80  
4 1     1   616 use Catalyst::Plugin::Geography::Implementation;
  0            
  0            
5              
6             our $VERSION = '0.03';
7              
8             *geo = \&geography; # Makes sri happy ;)
9              
10             sub geography {
11             my $c = shift;
12              
13             unless ( $c->{geography} ) {
14             $c->{geography} = Catalyst::Plugin::Geography::Implementation->new($c);
15             }
16              
17             return $c->{geography};
18             }
19              
20             __END__