From 92b8ff65410aa005ef662179d123dadf0fd3a155 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Sun, 15 Nov 2009 02:39:00 +0000
Subject:         - Patch from Michael Peters to fix a bug in email address
 handling:           exclude x_Email_Customer flag when it is not specified in
 content,           to avoid overriding admin settings.

---
 AuthorizeNet/AIM.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'AuthorizeNet')

diff --git a/AuthorizeNet/AIM.pm b/AuthorizeNet/AIM.pm
index 36296f0..5324e51 100644
--- a/AuthorizeNet/AIM.pm
+++ b/AuthorizeNet/AIM.pm
@@ -12,7 +12,7 @@ require Exporter;
 @ISA = qw(Exporter Business::OnlinePayment::AuthorizeNet);
 @EXPORT = qw();
 @EXPORT_OK = qw();
-$VERSION = '3.20';
+$VERSION = '3.21';
 
 sub set_defaults {
     my $self = shift;
@@ -225,7 +225,7 @@ sub submit {
     if (    $post_data{'x_Email_Customer'}
          && $post_data{'x_Email_Customer'} !~ /^FALSE$/i ) {
       $post_data{'x_Email_Customer'} = 'TRUE';
-    } else {
+    } elsif ( exists $post_data{'x_Email_Customer'} ) {
       $post_data{'x_Email_Customer'} = 'FALSE';
     }
 
-- 
cgit v1.2.1