From e41cdc31f1b670808c11f75affc83239a9194647 Mon Sep 17 00:00:00 2001
From: Ivan Kohler <ivan@freeside.biz>
Date: Thu, 27 Apr 2017 16:46:03 -0700
Subject: [PATCH] email referring customers on cancellation, RT#75756

---
 FS/FS/cust_pkg.pm | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/FS/FS/cust_pkg.pm b/FS/FS/cust_pkg.pm
index ef25c2479..91c5bd3eb 100644
--- a/FS/FS/cust_pkg.pm
+++ b/FS/FS/cust_pkg.pm
@@ -1057,9 +1057,10 @@ sub cancel {
      )
   {
     my $msgnum = $conf->config('cancel_msgnum', $cust_main->agentnum);
+    my $error = '';
     if ( $msgnum ) {
       my $msg_template = qsearchs('msg_template', { msgnum => $msgnum });
-      my $error = $msg_template->send(
+      $error = $msg_template->send(
         'cust_main' => $cust_main,
         'object'    => $self,
       );
@@ -1090,8 +1091,8 @@ sub cancel {
       'cust_main' => $cust_main->referring_cust_main,
       'object'    => $self,
     );
-     #should this do something on errors?
-   }
+    #should this do something on errors?
+  }
 
   ''; #no errors
 
-- 
2.11.0