summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorIvan Kohler <ivan@freeside.biz>2015-02-12 15:10:33 -0800
committerIvan Kohler <ivan@freeside.biz>2015-02-12 15:10:33 -0800
commit5a2f521b4aef0d8cdc709076440edfd0a077aaa3 (patch)
tree53a72c05d75a8f9012fc48eaff9898049b8e0411
parent0bf7a1ffc63873be09e848b900d89eb23cb99beb (diff)
fix warning about Action: Passing a list of values to enum is deprecated. Enum values should be wrapped in an arrayref.
-rw-r--r--BatchPayment.pm6
-rw-r--r--BatchPayment/Item.pm2
-rw-r--r--Changes3
3 files changed, 5 insertions, 6 deletions
diff --git a/BatchPayment.pm b/BatchPayment.pm
index 86ee6b9..abc2a83 100644
--- a/BatchPayment.pm
+++ b/BatchPayment.pm
@@ -16,13 +16,9 @@ $DEBUG = 0;
Business::BatchPayment - Batch-oriented payment processing
-=head1 VERSION
-
-Version 0.01
-
=cut
-our $VERSION = '0.01';
+our $VERSION = '0.02_01';
=head1 SYNOPSIS
diff --git a/BatchPayment/Item.pm b/BatchPayment/Item.pm
index d9a3ec7..ac11dae 100644
--- a/BatchPayment/Item.pm
+++ b/BatchPayment/Item.pm
@@ -31,7 +31,7 @@ Item TO the account identified by the Processor object's login settings."
=cut
-enum 'Action' => qw(payment credit);
+enum 'Action' => [qw(payment credit)];
coerce 'Action', from 'Str', via { lc $_ };
has action => (
is => 'rw',
diff --git a/Changes b/Changes
index 8d5f1fc..ade973c 100644
--- a/Changes
+++ b/Changes
@@ -1,4 +1,7 @@
Revision history for Business-BatchPayment
+0.02_01 unreleased
+ - fix warning about Action: Passing a list of values to enum is deprecated. Enum values should be wrapped in an arrayref.
+
0.01 unreleased