summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMitch Jackson <mitch@freeside.biz>2019-04-22 22:41:28 -0400
committerMitch Jackson <mitch@freeside.biz>2019-04-22 22:41:28 -0400
commitced39f8f0dfa79bb947678c00ea33d6538424516 (patch)
tree1956fb80db369d587a9a2df387835e60760f378c
parentef8b468214d2917b90f0537130f14c217ea71224 (diff)
Implement B::OP failure_status for declines
-rwxr-xr-xlib/Business/OnlinePayment/Bambora.pm5
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/Business/OnlinePayment/Bambora.pm b/lib/Business/OnlinePayment/Bambora.pm
index ea1a698..d872f2c 100755
--- a/lib/Business/OnlinePayment/Bambora.pm
+++ b/lib/Business/OnlinePayment/Bambora.pm
@@ -42,6 +42,7 @@ sub set_defaults {
card_token
expiry_month
expiry_year
+ failure_status
invoice_number
message_id
payment_method
@@ -455,6 +456,10 @@ sub submit_api_request {
$self->is_success( 0 );
$self->result_code( $response->{code} );
+ if ( $response->{message} =~ /decline/i ) {
+ $self->failure_status('declined');
+ }
+
return $self->error_message(
sprintf '%s %s',
$response->{code},