use vars qw($VERSION @ISA $me);
@ISA = qw(Business::OnlinePayment);
-$VERSION = '3.22';
+$VERSION = '3.23';
$me = 'Business::OnlinePayment::AuthorizeNet';
sub set_defaults {
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK);
@ISA = qw(Business::OnlinePayment::AuthorizeNet Business::OnlinePayment::HTTPS);
-$VERSION = '3.22';
+$VERSION = '3.23';
sub set_defaults {
my $self = shift;
length $self->{_content}->{customer_org}
) {
push @required_fields, qw( customer_org customer_ssn );
- } else {
+ }
+ elsif ( defined $self->{_content}->{license_num} and
+ length $self->{_content}->{license_num}
+ ) {
push @required_fields, qw(license_num license_state license_dob);
}
Steve Simitzis contributed a patch for better compatibility with
eProcessingNetwork's AuthorizeNet compatability mode.
+Craig Pearlman <cpearlma@yahoo.com> sent in a patch to more accurately declare
+required fields for E-check transcations.
+
=head1 SEE ALSO
perl(1). L<Business::OnlinePayment> L<Business::OnlinePayment::AuthorizeNet>.
Revision history for Perl extension Business::OnlinePayment::AuthorizeNet.
+3.23 unreleased
+ - Don't require libense_num / license_state / license_dob for E-Check
+ transacitons; not a universal requirement. Patch from Craig
+ Pearlman, thanks!
+
3.22 Mon Sep 26 15:06:52 PDT 2011
- Add missing t/lib/Business/FraudDetect/_Fake.pm to MANIFEST to fix
tests. Patch from Rob Brown, thanks! (closes: CPAN#52444)
Copyright (c) 1999 Jason Kohles.
Copyright (c) 2002-2003 Ivan Kohler
+Copyright (c) 2006-2014 Freeside Internet Services, Inc.
All rights reserved. This program is free software; you can redistribute it
and/or modify it under the same terms as Perl itself.