From: ivan <ivan>
Date: Fri, 12 Mar 2004 08:17:50 +0000 (+0000)
Subject: emaildecline-exclude skips any errors that contain the strings now, not just match... 
X-Git-Tag: freeside_1_4_2beta1~215
X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=400bf2b9a75f802afd28a43a0fbd2354eebcf833;p=freeside.git

emaildecline-exclude skips any errors that contain the strings now, not just match exactly
---

diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm
index 1c3941b21..6f2f01e33 100644
--- a/FS/FS/cust_bill.pm
+++ b/FS/FS/cust_bill.pm
@@ -896,7 +896,7 @@ sub realtime_bop {
 
     if ( !$realtime_bop_decline_quiet && $conf->exists('emaildecline')
          && grep { $_ ne 'POST' } $cust_main->invoicing_list
-         && ! grep { $_ eq $transaction->error_message }
+         && ! grep { $transaction->error_message =~ /$_/ }
                    $conf->config('emaildecline-exclude')
     ) {
       my @templ = $conf->config('declinetemplate');