File Coverage

blib/lib/WWW/Facebook/API/Feed.pm
Criterion Covered Total %
statement 14 15 93.3
branch 2 2 100.0
condition n/a
subroutine 7 8 87.5
pod 5 5 100.0
total 28 30 93.3


line stmt bran cond sub pod time code
1             #######################################################################
2             # ex: set ts=8 sw=4 et
3             #########################################################################
4             package WWW::Facebook::API::Feed;
5              
6 34     34   190 use warnings;
  34         92  
  34         1729  
7 34     34   173 use strict;
  34         63  
  34         1336  
8 34     34   167 use Carp;
  34         61  
  34         19981  
9              
10             sub publish_user_action {
11 1     1 1 31 return shift->base->call( 'feed.publishUserAction', @_ );
12             }
13              
14             sub register_template_bundle {
15 0     0 1 0 return shift->base->call( 'feed.registerTemplateBundle', @_ );
16             }
17              
18             sub deactivate_template_bundle {
19 1     1 1 27 return shift->base->call( 'feed.deactivateTemplateBundleById', @_ );
20             }
21              
22             sub get_registered_template_bundle {
23 2 100   2 1 7 my $method =
24             @_ > 1
25             ? 'feed.getRegisteredTemplateBundleById'
26             : 'feed.getRegisteredTemplateBundles';
27              
28 2         50 return shift->base->call( $method, @_ );
29             }
30              
31             sub publish_templatized_action {
32 1     1 1 27 return shift->base->call( 'feed.publishTemplatizedAction', @_ );
33             }
34              
35             1; # Magic true value required at end of module
36             __END__