From: jeff Date: Thu, 21 Jun 2007 19:25:50 +0000 (+0000) Subject: don't die when we do not know how to perform the transaction X-Git-Url: http://git.freeside.biz/gitweb/?p=Business-OnlinePayment-TransFirsteLink.git;a=commitdiff_plain;h=068cfc28113f95495441c5b1ef84380952903eaa don't die when we do not know how to perform the transaction --- diff --git a/TransFirsteLink.pm b/TransFirsteLink.pm index 6bcbfab..8edf2dd 100644 --- a/TransFirsteLink.pm +++ b/TransFirsteLink.pm @@ -7,7 +7,7 @@ use Tie::IxHash; use base qw(Business::OnlinePayment::HTTPS); -$VERSION = '0.03'; +$VERSION = '0.04'; $VERSION = eval $VERSION; $DEBUG = 0; @@ -375,8 +375,12 @@ sub submit { my $type_action = $self->transaction_type(). '_'. $content{TransactionCode}; unless ( exists($required{$type_action}) ) { - croak( "TransFirst eLink can't (yet?) handle transaction type: ". - "$content{action} on " . $self->transaction_type() ); +# croak( "TransFirst eLink can't (yet?) handle transaction type: ". +# "$content{action} on " . $self->transaction_type() ); + $self->error_message("TransFirst eLink can't handle transaction type: ". + "$content{action} on " . $self->transaction_type() ); + $self->is_success(0); + return; } my $expdate_mmyy = $self->expdate_mmyy( $content{"expiration"} );