add email->Email mapping

diff --git a/Changes b/Changes
index 547b726..86fad5f 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,5 +1,8 @@
 Revision history for Perl extension Business::OnlinePayment::TransactionCentral.
 
+0.05  unreleased
+        - add email->Email mapping
+
 0.04  Wed May 30 11:53:00 PDT 2007
         - depend on B:OP v3
         - fix a "false success" problem caused by discrepancy between test and

diff --git a/lib/Business/OnlinePayment/TransactionCentral.pm b/lib/Business/OnlinePayment/TransactionCentral.pm
index c9d7653..d510255 100644 (file)
--- a/lib/Business/OnlinePayment/TransactionCentral.pm
+++ b/lib/Business/OnlinePayment/TransactionCentral.pm
@@ -8,7 +8,7 @@ use Business::OnlinePayment::HTTPS 0.02;
 use vars qw($VERSION @ISA $DEBUG);
 
 @ISA = qw(Business::OnlinePayment::HTTPS);
-$VERSION = '0.04';
+$VERSION = '0.05';
 $DEBUG = 0;
 
 sub set_defaults {
@@ -35,6 +35,7 @@ sub submit {
     'NameonAccount' => 'name',
     'AVSADDR'       => 'address',
     'AVSZIP'        => 'zip',
+    'Email'         => 'email',
     'CCRURL'        => \'',
     'CVV2'          => 'cvv2',
     'TransID'       => 'order_number',