currency field

[Business-OnlinePayment-AuthorizeNet.git] / AuthorizeNet.pm

diff --git a/AuthorizeNet.pm b/AuthorizeNet.pm
index 8a389b9..63e2b6f 100644 (file)
--- a/AuthorizeNet.pm
+++ b/AuthorizeNet.pm
@@ -1,6 +1,6 @@
 package Business::OnlinePayment::AuthorizeNet;
 
-# $Id: AuthorizeNet.pm,v 1.12 2002-08-03 21:20:51 ivan Exp $
+# $Id: AuthorizeNet.pm,v 1.13 2002-08-14 00:09:11 ivan Exp $
 
 use strict;
 use Carp;
@@ -107,6 +107,7 @@ sub submit {
         company        => 'x_Company',
        order_number   => 'x_Trans_ID',
        cvv2           => 'x_Card_Code',
+       currency       => 'x_Currency_Code',
     );
 
     if($self->transaction_type() eq "ECHECK") {
@@ -271,6 +272,8 @@ OST <services@ostel.com> paid for it.
 
 T.J. Mather <tjmather@maxmind.com> sent a patch for the CVV2 field.
 
+Mike Barry <mbarry@cos.com> sent in a patch for the referer field.
+
 =head1 SEE ALSO
 
 perl(1). L<Business::OnlinePayment>.