From 400bf2b9a75f802afd28a43a0fbd2354eebcf833 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Fri, 12 Mar 2004 08:17:50 +0000
Subject: [PATCH] emaildecline-exclude skips any errors that contain the
 strings now, not just match exactly

---
 FS/FS/cust_bill.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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');
-- 
2.20.1