File Coverage

blib/lib/WWW/TypePad/Relationships.pm
Criterion Covered Total %
statement 6 16 37.5
branch n/a
condition n/a
subroutine 2 6 33.3
pod 0 4 0.0
total 8 26 30.7


line stmt bran cond sub pod time code
1             package WWW::TypePad::Relationships;
2             ### BEGIN auto-generated
3             ### This is an automatically generated code, do not edit!
4             ### Scroll down to look for END to add additional methods
5              
6 1     1   4 use strict;
  1         1  
  1         32  
7 1     1   3 use Any::Moose;
  1         1  
  1         4  
8             extends 'WWW::TypePad::Noun';
9              
10 0     0 0   sub prefix { '/relationships' }
11              
12             sub get {
13 0     0 0   my $api = shift;
14 0           my $id = shift;
15 0           $api->_get($id);
16             }
17              
18             sub status {
19 0     0 0   my $api = shift;
20 0           my $id = shift;
21 0           $api->_get($id, 'status', undef, undef, @_);
22             }
23              
24             sub set_status {
25 0     0 0   my $api = shift;
26 0           my $id = shift;
27 0           $api->_post($id, 'status', undef, undef, @_);
28             }
29              
30              
31             ### END auto-generated
32              
33              
34              
35              
36             1;