File Coverage

blib/lib/Net/Braintree/Gateway.pm
Criterion Covered Total %
statement 34 36 94.4
branch n/a
condition n/a
subroutine 12 12 100.0
pod n/a
total 46 48 95.8


line stmt bran cond sub pod time code
1             package Net::Braintree::Gateway;
2              
3 1     1   291 use Net::Braintree::AddressGateway;
  1         3  
  1         31  
4 1     1   439 use Net::Braintree::ClientTokenGateway;
  1         2  
  1         29  
5 1     1   325 use Net::Braintree::CreditCardGateway;
  1         2  
  1         28  
6 1     1   355 use Net::Braintree::CreditCardVerificationGateway;
  1         3  
  1         32  
7 1     1   344 use Net::Braintree::CustomerGateway;
  1         1  
  1         28  
8 1     1   342 use Net::Braintree::MerchantAccountGateway;
  1         2  
  1         29  
9 1     1   331 use Net::Braintree::PaymentMethodGateway;
  1         2  
  1         28  
10 1     1   349 use Net::Braintree::PayPalAccountGateway;
  1         1  
  1         26  
11 1     1   327 use Net::Braintree::SettlementBatchSummaryGateway;
  1         2  
  1         28  
12 1     1   5 use Net::Braintree::SubscriptionGateway;
  1         2  
  1         18  
13 1     1   336 use Net::Braintree::TransactionGateway;
  1         2  
  1         26  
14 1     1   347 use Net::Braintree::TransparentRedirectGateway;
  0            
  0            
15             use Net::Braintree::WebhookNotificationGateway;
16             use Net::Braintree::WebhookTestingGateway;
17              
18             use Moose;
19              
20             has 'config' => (is => 'ro');
21              
22             has 'address' => (is => 'ro', lazy => 1, default => sub {
23             my $self = shift;
24             Net::Braintree::AddressGateway->new(gateway => $self);
25             });
26              
27             has 'client_token' => (is => 'ro', lazy => 1, default => sub {
28             my $self = shift;
29             Net::Braintree::ClientTokenGateway->new(gateway => $self);
30             });
31              
32             has 'credit_card' => (is => 'ro', lazy => 1, default => sub {
33             my $self = shift;
34             Net::Braintree::CreditCardGateway->new(gateway => $self);
35             });
36              
37             has 'credit_card_verification' => (is => 'ro', lazy => 1, default => sub {
38             my $self = shift;
39             Net::Braintree::CreditCardVerificationGateway->new(gateway => $self);
40             });
41              
42             has 'customer' => (is => 'ro', lazy => 1, default => sub {
43             my $self = shift;
44             Net::Braintree::CustomerGateway->new(gateway => $self);
45             });
46              
47             has 'merchant_account' => (is => 'ro', lazy => 1, default => sub {
48             my $self = shift;
49             Net::Braintree::MerchantAccountGateway->new(gateway => $self);
50             });
51              
52             has 'payment_method' => (is => 'ro', lazy => 1, default => sub {
53             my $self = shift;
54             Net::Braintree::PaymentMethodGateway->new(gateway => $self);
55             });
56              
57             has 'paypal_account' => (is => 'ro', lazy => 1, default => sub {
58             my $self = shift;
59             Net::Braintree::PayPalAccountGateway->new(gateway => $self);
60             });
61              
62             has 'settlement_batch_summary' => (is => 'ro', lazy => 1, default => sub {
63             my $self = shift;
64             Net::Braintree::SettlementBatchSummaryGateway->new(gateway => $self);
65             });
66              
67             has 'subscription' => (is => 'ro', lazy => 1, default => sub {
68             my $self = shift;
69             Net::Braintree::SubscriptionGateway->new(gateway => $self);
70             });
71              
72             has 'transaction' => (is => 'ro', lazy => 1, default => sub {
73             my $self = shift;
74             Net::Braintree::TransactionGateway->new(gateway => $self);
75             });
76              
77             has 'transparent_redirect' => (is => 'ro', lazy => 1, default => sub {
78             my $self = shift;
79             Net::Braintree::TransparentRedirectGateway->new(gateway => $self);
80             });
81              
82             has 'webhook_notification' => (is => 'ro', lazy => 1, default => sub {
83             my $self = shift;
84             Net::Braintree::WebhookNotificationGateway->new(gateway => $self);
85             });
86              
87             has 'webhook_testing' => (is => 'ro', lazy => 1, default => sub {
88             my $self = shift;
89             Net::Braintree::WebhookTestingGateway->new(gateway => $self);
90             });
91              
92             sub http {
93             Net::Braintree::HTTP->new(config => shift->config);
94             }
95              
96             1;