File Coverage

blib/lib/WebService/Braintree/TransparentRedirect.pm
Criterion Covered Total %
statement 3 18 16.6
branch n/a
condition n/a
subroutine 1 9 11.1
pod 7 8 87.5
total 11 35 31.4


line stmt bran cond sub pod time code
1             package WebService::Braintree::TransparentRedirect;
2             $WebService::Braintree::TransparentRedirect::VERSION = '0.92';
3             =head1 NAME
4              
5             WebService::Braintree::TransparentRedirect
6              
7             =head1 PURPOSE
8              
9             This class generates and manages the transparent redirects.
10              
11             =head1 EXPLANATION
12              
13             TODO
14              
15             =cut
16              
17 1     1   6 use Moose;
  1         2  
  1         6  
18              
19             =head1 CLASS METHODS
20              
21             =head2 confirm()
22              
23             This takes a query string and returns whatever confirm() returns.
24              
25             =cut
26              
27             sub confirm {
28 0     0 1   my($class, $query_string) = @_;
29 0           $class->gateway->transparent_redirect->confirm($query_string);
30             }
31              
32             =head2 transaction_data()
33              
34             This takes a hashref of params and returns whatever transaction_data() returns.
35              
36             =cut
37              
38             sub transaction_data {
39 0     0 1   my ($class, $params) = @_;
40 0           $class->gateway->transparent_redirect->transaction_data($params);
41             }
42              
43             =head2 create_customer_data()
44              
45             This takes a hashref of params and returns whatever create_customer_data() returns.
46              
47             =cut
48              
49             sub create_customer_data {
50 0     0 1   my ($class, $params) = @_;
51 0           $class->gateway->transparent_redirect->create_customer_data($params);
52             }
53              
54             =head2 update_customer_data()
55              
56             This takes a hashref of params and returns whatever update_customer_data() returns.
57              
58             =cut
59              
60             sub update_customer_data {
61 0     0 1   my ($class, $params) = @_;
62 0           $class->gateway->transparent_redirect->update_customer_data($params);
63             }
64              
65             =head2 create_credit_card_data()
66              
67             This takes a hashref of params and returns whatever create_credit_card_data() returns.
68              
69             =cut
70              
71             sub create_credit_card_data {
72 0     0 1   my ($class, $params) = @_;
73 0           $class->gateway->transparent_redirect->create_credit_card_data($params);
74             }
75              
76             =head2 update_credit_card_data()
77              
78             This takes a hashref of params and returns whatever update_credit_card_data() returns.
79              
80             =cut
81              
82             sub update_credit_card_data {
83 0     0 1   my ($class, $params) = @_;
84 0           $class->gateway->transparent_redirect->update_credit_card_data($params);
85             }
86              
87             =head2 url()
88              
89             This takes no parameters and returns whatever url() returns.
90              
91             =cut
92              
93             sub url {
94 0     0 1   my $class = shift;
95 0           $class->gateway->transparent_redirect->url;
96             }
97              
98             sub gateway {
99 0     0 0   WebService::Braintree->configuration->gateway;
100             }
101              
102             __PACKAGE__->meta->make_immutable;
103              
104             1;
105             __END__
106              
107             =head1 TODO
108              
109             =over 4
110              
111             =item Need to document the required and optional input parameters
112              
113             =item Need to document the possible errors/exceptions
114              
115             =back
116              
117             =cut