File Coverage

blib/lib/Business/Giropay/Response/Transaction.pm
Criterion Covered Total %
statement 11 11 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1             package Business::Giropay::Response::Transaction;
2              
3             =head1 NAME
4              
5             Business::Giropay::Response::Transaction - response object for L
6              
7             =cut
8              
9 1     1   16756 use Business::Giropay::Types qw/Map Maybe Str/;
  1         3  
  1         6  
10 1     1   1064 use Moo;
  1         8520  
  1         7  
11             with 'Business::Giropay::Role::Response';
12 1     1   1395 use namespace::clean;
  1         7832  
  1         4  
13              
14             =head1 ATTRIBUTES
15              
16             See L for attributes common to
17             all request classes.
18              
19             =head2 reference
20              
21             Unique transaction ID from GiroCheckout.
22              
23             =cut
24              
25             has reference => (
26             is => 'lazy',
27             isa => Maybe [Str],
28             init_arg => undef,
29             );
30              
31             sub _build_reference {
32 2     2   1179 shift->data->{reference};
33             }
34              
35             =head2 redirect
36              
37             Redirect URL to redirect the client to complete Online Banking transaction.
38              
39             =cut
40              
41             has redirect => (
42             is => 'lazy',
43             isa => Maybe [Str],
44             init_arg => undef,
45             );
46              
47             sub _build_redirect {
48 2     2   1268 shift->data->{redirect};
49             }
50              
51             =head1 METHODS
52              
53             See L.
54              
55             =cut
56              
57             1;