Merge pull request #30 from maxmind/greg/increase-exp-date

Increase expiration date in mocked data
maxmind · Jan 3, 2022 · 782cd52 · 782cd52
2 parents e8cebf4 + 116f162
commit 782cd52
Show file tree

Hide file tree

Showing 8 changed files with 20 additions and 14 deletions.
diff --git a/Changes b/Changes
@@ -2,6 +2,10 @@ Revision history for WebService-PayPal-PaymentsAdvanced
 
 {{$NEXT}}
 
+0.000028 2022-01-01
+
+  - Update 12/21 expiration dates in mocked data to 12/31.
+
 0.000027 2021-06-28
 
   - The transaction_time method on responses will now return undef if

diff --git a/LICENSE b/LICENSE
@@ -1,4 +1,4 @@
-This software is copyright (c) 2021 by MaxMind, Inc.
+This software is copyright (c) 2022 by MaxMind, Inc.
 
 This is free software; you can redistribute it and/or modify it under
 the same terms as the Perl 5 programming language system itself.
@@ -12,7 +12,7 @@ b) the "Artistic License"
 
 --- The GNU General Public License, Version 1, February 1989 ---
 
-This software is Copyright (c) 2021 by MaxMind, Inc.
+This software is Copyright (c) 2022 by MaxMind, Inc.
 
 This is free software, licensed under:
 
@@ -272,7 +272,7 @@ That's all there is to it!
 
 --- The Artistic License 1.0 ---
 
-This software is Copyright (c) 2021 by MaxMind, Inc.
+This software is Copyright (c) 2022 by MaxMind, Inc.
 
 This is free software, licensed under:
 

diff --git a/README.md b/README.md
@@ -360,12 +360,13 @@ Olaf Alders <[email protected]>
 - Mark Fowler <[email protected]>
 - Mateu X Hunter <[email protected]>
 - Narsimham Chelluri <[email protected]>
+- Nick Logan <[email protected]>
 - Olaf Alders <[email protected]>
 - William Storey <[email protected]>
 
 # COPYRIGHT AND LICENSE
 
-This software is copyright (c) 2021 by MaxMind, Inc.
+This software is copyright (c) 2022 by MaxMind, Inc.
 
 This is free software; you can redistribute it and/or modify it under
 the same terms as the Perl 5 programming language system itself.
diff --git a/lib/WebService/PayPal/PaymentsAdvanced.pm b/lib/WebService/PayPal/PaymentsAdvanced.pm
@@ -360,7 +360,8 @@ sub sale_from_paypal_reference_transaction {
 
 sub _paypal_reference_transaction {
     my $self = shift;
-    state $check = compile( NonEmptyStr, NonEmptyStr, Num, NonEmptyStr,
+    state $check = compile(
+        NonEmptyStr, NonEmptyStr, Num, NonEmptyStr,
         Optional [HashRef]
     );
     my ( $type, $baid, $amount, $currency, $extra ) = $check->(@_);

diff --git a/lib/WebService/PayPal/PaymentsAdvanced/Mocker/PayflowPro.pm b/lib/WebService/PayPal/PaymentsAdvanced/Mocker/PayflowPro.pm
@@ -58,7 +58,7 @@ post '/' => sub {
                 CARDTYPE      => 3,
                 CORRELATIONID => $helper->correlationid,
                 CVV2MATCH     => 'Y',
-                EXPDATE       => 1221,
+                EXPDATE       => 1231,
                 IAVS          => 'N',
                 LASTNAME      => 'NotProvided',
                 PNREF         => $helper->pnref,
@@ -112,7 +112,7 @@ post '/' => sub {
             AMT           => 50.00,
             CARDTYPE      => 1,
             CORRELATIONID => $helper->correlationid,
-            EXPDATE       => 1221,
+            EXPDATE       => 1231,
             LASTNAME      => 'NotProvided',
             ORIGPNREF     => $params->{ORIGID},
             ORIGPPREF     => $helper->ppref,
@@ -142,7 +142,7 @@ post '/' => sub {
                 CARDTYPE      => 3,
                 CORRELATIONID => $helper->correlationid,
                 CVV2MATCH     => 'Y',
-                EXPDATE       => 1221,
+                EXPDATE       => 1231,
                 IAVS          => 'N',
                 LASTNAME      => 'NotProvided',
                 PNREF         => $helper->pnref,

diff --git a/lib/WebService/PayPal/PaymentsAdvanced/Mocker/SilentPOST.pm b/lib/WebService/PayPal/PaymentsAdvanced/Mocker/SilentPOST.pm
@@ -99,7 +99,7 @@ sub credit_card_success {
             COUNTRYTOSHIP => 'US',
             CVV2MATCH     => 'Y',
             EMAILTOSHIP   => q{},
-            EXPDATE       => 1221,
+            EXPDATE       => 1231,
             IAVS          => 'N',
             INVNUM        => 69,
             INVOICE       => 69,
@@ -138,7 +138,7 @@ sub credit_card_duplicate_invoice_id {
             COUNTRY       => 'US',
             COUNTRYTOSHIP => 'US',
             EMAILTOSHIP   => q{},
-            EXPDATE       => 1221,
+            EXPDATE       => 1231,
             HOSTCODE      => 10536,
             INVNUM        => 64,
             INVOICE       => 64,
@@ -180,7 +180,7 @@ sub credit_card_auth_verification_success {
             COUNTRYTOSHIP => 'US',
             CVV2MATCH     => 'Y',
             EMAILTOSHIP   => q{},
-            EXPDATE       => 1221,
+            EXPDATE       => 1231,
             HOSTCODE      => 10574,
             IAVS          => 'N',
             LASTNAME      => 'NotProvided',

diff --git a/lib/WebService/PayPal/PaymentsAdvanced/Response.pm b/lib/WebService/PayPal/PaymentsAdvanced/Response.pm
@@ -10,7 +10,7 @@ use List::AllUtils qw( any );
 use Types::Common::String qw( NonEmptyStr );
 use Types::Standard qw( ArrayRef Int Maybe );
 use WebService::PayPal::PaymentsAdvanced::Error::Authentication ();
-use WebService::PayPal::PaymentsAdvanced::Error::Generic ();
+use WebService::PayPal::PaymentsAdvanced::Error::Generic        ();
 
 has _nonfatal_result_codes => (
     init_arg => 'nonfatal_result_codes',

diff --git a/lib/WebService/PayPal/PaymentsAdvanced/Response/FromSilentPOST.pm b/lib/WebService/PayPal/PaymentsAdvanced/Response/FromSilentPOST.pm
@@ -36,8 +36,8 @@ sub BUILD {
 
 {
     my $Address
-        = class_type( { class => 'Net::Works::Address' } )
-        ->plus_coercions( NonEmptyStr,
+        = class_type( { class => 'Net::Works::Address' } )->plus_coercions(
+        NonEmptyStr,
         sub { Net::Works::Address->new_from_string( string => $_ ) },
         );