From 11f98403d0c7bf158ad0f71120e15c0bdf3d792c Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Fri, 14 Jul 2006 04:20:21 +0000
Subject: don't send cancellation emails on package changes

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

diff --git a/FS/FS/cust_pkg.pm b/FS/FS/cust_pkg.pm
index ed9f2cbc6..45128e966 100644
--- a/FS/FS/cust_pkg.pm
+++ b/FS/FS/cust_pkg.pm
@@ -1365,7 +1365,7 @@ sub order {
       $dbh->rollback if $oldAutoCommit;
       return "Unable to transfer all services from package ".$old_pkg->pkgnum;
     }
-    $error = $old_pkg->cancel;
+    $error = $old_pkg->cancel( quiet=>1 );
     if ($error) {
       $dbh->rollback;
       return $error;
-- 
cgit v1.2.1