From: Mark Wells <mark@freeside.biz>
Date: Tue, 16 Jul 2013 17:50:14 +0000 (-0700)
Subject: minor fix
X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=b4bfc451959ea0d6e128fbb440fe01a813b6b69a;p=freeside.git

minor fix
---

diff --git a/FS/FS/cust_pkg.pm b/FS/FS/cust_pkg.pm
index 53335dff9..93bff4b09 100644
--- a/FS/FS/cust_pkg.pm
+++ b/FS/FS/cust_pkg.pm
@@ -2142,10 +2142,13 @@ sub change_later {
         $self->set('change_to_pkgnum', $err_or_pkg->pkgnum);
         $self->set('expire', $date); # in case it's different
         $err_or_pkg->set('start_date', $date);
+        $err_or_pkg->set('change_date', '');
+        $err_or_pkg->set('change_pkgnum', '');
 
         $error = $self->replace       ||
                  $err_or_pkg->replace ||
-                 $err_or_pkg->delete;
+                 $change_to->cancel   ||
+                 $change_to->delete;
       } else {
         $error = $err_or_pkg;
       }