X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=PaymentsGateway.pm;h=6fabcbf7f2a146a2d312ad27d6b97c9d333c5e4f;hb=9b9f7dbb4525b87ceb068cd31a258044168c444c;hp=4f8610669eed66e05e9cc5b12ff53caeb69d7b5f;hpb=7d8253e2ac3dda28c8013aca209570d3e4496567;p=Business-OnlinePayment-PaymentsGateway.git

diff --git a/PaymentsGateway.pm b/PaymentsGateway.pm
index 4f86106..6fabcbf 100644
--- a/PaymentsGateway.pm
+++ b/PaymentsGateway.pm
@@ -11,7 +11,7 @@ require Exporter;
 @ISA = qw( Exporter AutoLoader Business::OnlinePayment);
 @EXPORT = qw();
 @EXPORT_OK = qw();
-$VERSION = '0.01';
+$VERSION = '0.02';
 
 $DEBUG = 0;
 
@@ -44,7 +44,7 @@ my %pg_response_code = (
   'U51' => 'Merchant is not "live"',
   'U52' => 'Merchant not approved for transaction type (CC or EFT)',
   'U53' => 'Transaction amount exceeds merchant\'s per transaction limit',
-  'U54' => 'Merchant\'s configuration requires updating ­ call customer'.
+  'U54' => 'Merchant\'s configuration requires updating - call customer'.
            ' support',
   'U80' => 'Transaction was declined due to preauthorization (ATM Verify)'.
            ' result',
@@ -70,7 +70,6 @@ sub set_defaults {
   my $self = shift;
   $self->server('paymentsgateway.net');
   $self->port( 5050 );
-  $self->build_subs(qw(test_transaction));
 }
 
 sub map_fields {
@@ -184,7 +183,7 @@ sub submit {
   }
 
   my $request = join("\n", map { "$_=". $content{$_} }
-                           grep { $content{$_} ne '' }
+                           grep { defined($content{$_}) && $content{$_} ne '' }
                            @fields                     ).
                 "\nendofdata\n";