From ced39f8f0dfa79bb947678c00ea33d6538424516 Mon Sep 17 00:00:00 2001 From: Mitch Jackson Date: Mon, 22 Apr 2019 22:41:28 -0400 Subject: [PATCH] Implement B::OP failure_status for declines --- lib/Business/OnlinePayment/Bambora.pm | 5 +++++ 1 file changed, 5 insertions(+) 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}, -- 2.11.0