File Coverage

blib/lib/Net/Google/Code/Role/URL.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1             package Net::Google::Code::Role::URL;
2 10     10   7299 use Any::Moose 'Role';
  10         20  
  10         73  
3              
4             # requires don't support attribute yet :/
5             # requires 'project';
6              
7             has 'base_url' => (
8             isa => 'Str',
9             is => 'ro',
10             lazy => 1,
11             default => sub { 'http://code.google.com/p/' . $_[0]->project . '/' },
12             );
13              
14             has 'base_svn_url' => (
15             is => 'ro',
16             isa => 'Str',
17             lazy => 1,
18             default => sub { 'http://' . $_[0]->project . '.googlecode.com/svn/' },
19             );
20              
21             has 'base_feeds_url' => (
22             is => 'ro',
23             isa => 'Str',
24             lazy => 1,
25             default => sub {
26             'http://code.google.com/feeds/p/' . $_[0]->project . '/'
27             },
28             );
29              
30 10     10   5831 no Any::Moose;
  10         34  
  10         62  
31              
32             1;
33              
34             __END__