File Coverage

blib/lib/GitHub/API/User.pm
Criterion Covered Total %
statement 6 10 60.0
branch n/a
condition n/a
subroutine 2 3 66.6
pod 1 1 100.0
total 9 14 64.2


line stmt bran cond sub pod time code
1             #
2             # This file is part of GitHub-API
3             #
4             # This software is Copyright (c) 2013 by Chris Weyl.
5             #
6             # This is free software, licensed under:
7             #
8             # The GNU Lesser General Public License, Version 2.1, February 1999
9             #
10             package GitHub::API::User;
11             {
12             $GitHub::API::User::VERSION = '0.000000_03';
13             }
14              
15 1     1   741 use common::sense;
  1         2  
  1         8  
16              
17             # ABSTRACT: A user
18              
19 1     1   58 use aliased 'GitHub::API::Repo';
  1         1  
  1         8  
20              
21             # debugging...
22             #use Smart::Comments '###', '####';
23              
24              
25             sub repo {
26 0     0 1   my ($self, $repo) = @_;
27              
28 0           my %repo = (%$self, repo => $repo);
29 0           $repo{url} = "/repos/$self->{user}/$repo";
30              
31             #### %repo
32 0           return bless \%repo, Repo;
33             }
34              
35              
36              
37             !!42;
38              
39             __END__