use Net::SSLeay qw(sslcat);
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK $DEBUG);
-require Exporter;
-
-@ISA = qw( Exporter AutoLoader Business::OnlinePayment);
-@EXPORT = qw();
-@EXPORT_OK = qw();
+@ISA = qw( Business::OnlinePayment );
$VERSION = '0.02';
$DEBUG = 0;
'discover' => 10,
'cc' => 10,
'check' => 20,
+ 'echeck' => 20,
);
#pg_type/action = action + type
)
);
- if ( $content{'type'} =~ /^check$/i ) {
+ if ( $content{'type'} =~ /^e?check$/i ) {
push @fields, qw( ecom_payment_check_trn
ecom_payment_check_account
ecom_payment_check_account_type );
=head1 NOTE
-This module only implements 'CHECK' (ACH) transactions at this time. Credit
+This module only implements 'ECHECK' (ACH) transactions at this time. Credit
card transactions are not (yet) supported.
=head1 COMPATIBILITY