| Subject: | Minor fixes to AuthorizeNet.pm |
The attached patch makes small fixes to AuthorizeNet.pm
* Eliminate inheriting from AutoLoader. We're not using it and it just
screws up the error messages.
* account_type mentioned twice in the required fields for checks.
* Quiet an uninit value warning when customer_org is not set.
| Subject: | au.patch |
=== AuthorizeNet.pm
==================================================================
--- AuthorizeNet.pm (revision 19623)
+++ AuthorizeNet.pm (local)
@@ -9,7 +9,7 @@
require Exporter;
-@ISA = qw(Exporter AutoLoader Business::OnlinePayment);
+@ISA = qw(Exporter Business::OnlinePayment);
@EXPORT = qw();
@EXPORT_OK = qw();
$VERSION = '3.15';
@@ -151,10 +151,12 @@
push @required_fields, qw(
amount routing_code account_number account_type bank_name
- account_name account_type
+ account_name
);
- if ($self->{_content}->{customer_org} ne '') {
+ if (defined $self->{_content}->{customer_org} and
+ length $self->{_content}->{customer_org}
+ ) {
push @required_fields, qw( customer_org customer_ssn );
} else {
push @required_fields, qw(license_num license_state license_dob);