File Coverage

lib/WebService/Braintree/ApplePayCard.pm
Criterion Covered Total %
statement 11 16 68.7
branch n/a
condition n/a
subroutine 4 7 57.1
pod 0 3 0.0
total 15 26 57.6


line stmt bran cond sub pod time code
1             package WebService::Braintree::ApplePayCard;
2             $WebService::Braintree::ApplePayCard::VERSION = '0.94';
3 20     20   421 use 5.010_001;
  20         64  
4 20     20   101 use strictures 1;
  20         145  
  20         744  
5              
6 20     20   6624 use WebService::Braintree::ApplePayCard::CardType;
  20         40  
  20         474  
7              
8 20     20   93 use Moose;
  20         31  
  20         111  
9             extends 'WebService::Braintree::PaymentMethod';
10              
11             sub BUILD {
12 0     0 0   my ($self, $attributes) = @_;
13 0           $self->set_attributes_from_hash($self, $attributes);
14             }
15              
16             sub expiration_date {
17 0     0 0   my $self = shift;
18 0           return $self->expiration_month . "/" . $self->expiration_year;
19             }
20              
21             sub is_default {
22 0     0 0   return shift->default;
23             }
24              
25             __PACKAGE__->meta->make_immutable;
26              
27             1;
28             __END__