File Coverage

blib/lib/WebService/PayPal/PaymentsAdvanced/Role/HasPayPal.pm
Criterion Covered Total %
statement 9 9 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 12 12 100.0


line stmt bran cond sub pod time code
1             package WebService::PayPal::PaymentsAdvanced::Role::HasPayPal;
2              
3 6     6   3324 use Moo::Role;
  6         18  
  6         45  
4              
5 6     6   2032 use namespace::autoclean;
  6         17  
  6         50  
6              
7             our $VERSION = '0.000026';
8              
9 6     6   565 use Types::Common::String qw( NonEmptyStr );
  6         31  
  6         66  
10              
11             has reference_transaction_id => (
12             is => 'lazy',
13             isa => NonEmptyStr,
14             init_arg => undef,
15             default => sub { shift->params->{BAID} },
16             );
17              
18             1;
19              
20             # ABSTRACT: Role which provides methods specifically for PayPal transactions
21              
22             __END__
23              
24             =pod
25              
26             =head1 NAME
27              
28             WebService::PayPal::PaymentsAdvanced::Role::HasPayPal - Role which provides methods specifically for PayPal transactions
29              
30             =head1 VERSION
31              
32             version 0.000026
33              
34             =head1 METHODS
35              
36             =head2 reference_transaction_id
37              
38             The id you will use in order to use this as a reference transaction (C<BAID>).
39              
40             =head1 AUTHOR
41              
42             Olaf Alders <olaf@wundercounter.com>
43              
44             =head1 COPYRIGHT AND LICENSE
45              
46             This software is copyright (c) 2020 by MaxMind, Inc.
47              
48             This is free software; you can redistribute it and/or modify it under
49             the same terms as the Perl 5 programming language system itself.
50              
51             =cut