fix warning about Action: Passing a list of values to enum is deprecated. Enum values...

[Business-BatchPayment.git] / BatchPayment / Item.pm

diff --git a/BatchPayment/Item.pm b/BatchPayment/Item.pm
index c929cf3..ac11dae 100644 (file)
--- 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',
@@ -43,9 +43,8 @@ has action => (
 
 =item payment_type
 
-"CC" or "ECHECK".  Most processors will only support 
-one or the other, and if set on the BBP::Processor object, this is not
-required.
+"CC" or "ECHECK".  Most processors will only support one or the other, 
+and if set on the Processor object, this is not required.
 
 =cut
 
@@ -240,6 +239,11 @@ other operations on the transaction, like voiding or refunding it.
 The authorization code, probably only meaningful for credit cards.  
 Should be undef (or not present) if the transaction wasn't approved.
 
+=item check_number
+
+The check number, probably only meaningful if this transaction was
+processed from a paper check.
+
 =item assigned_token
 
 In tokenized systems which store the customer's account number or 
@@ -267,6 +271,8 @@ has [qw(
   assigned_token
 )] => ( is => 'rw', isa => 'Str');
 
+has check_number => ( is => 'rw', isa => 'Int' );
+
 __PACKAGE__->meta->make_immutable;
 
 1;