File Coverage

lib/WebService/Braintree/Role/MakeRequest.pm
Criterion Covered Total %
statement 8 12 66.6
branch n/a
condition n/a
subroutine 3 4 75.0
pod n/a
total 11 16 68.7


line stmt bran cond sub pod time code
1             package WebService::Braintree::Role::MakeRequest;
2             $WebService::Braintree::Role::MakeRequest::VERSION = '0.94';
3 20     20   8054 use 5.010_001;
  20         73  
4 20     20   101 use strictures 1;
  20         112  
  20         689  
5              
6 20     20   7220 use Moose::Role;
  20         95563  
  20         67  
7              
8             sub _make_request {
9 0     0     my($self, $path, $verb, $params) = @_;
10 0           my $response = $self->gateway->http->$verb($path, $params);
11 0           my $result = WebService::Braintree::Result->new(response => $response);
12 0           return $result;
13             }
14              
15             1;
16             __END__