File Coverage

blib/lib/WebService/Braintree/ApplePayCard.pm
Criterion Covered Total %
statement 6 11 54.5
branch n/a
condition n/a
subroutine 2 5 40.0
pod 0 3 0.0
total 8 19 42.1


line stmt bran cond sub pod time code
1             package WebService::Braintree::ApplePayCard;
2             $WebService::Braintree::ApplePayCard::VERSION = '0.92';
3 1     1   255 use WebService::Braintree::ApplePayCard::CardType;
  1         3  
  1         23  
4              
5 1     1   6 use Moose;
  1         1  
  1         7  
6             extends 'WebService::Braintree::PaymentMethod';
7              
8             sub BUILD {
9 0     0 0   my ($self, $attributes) = @_;
10 0           $self->set_attributes_from_hash($self, $attributes);
11             }
12              
13             sub expiration_date {
14 0     0 0   my $self = shift;
15 0           return $self->expiration_month . "/" . $self->expiration_year;
16             }
17              
18             sub is_default {
19 0     0 0   return shift->default;
20             }
21              
22             __PACKAGE__->meta->make_immutable;
23             1;
24