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

minor fix
---

diff --git a/FS/FS/cust_pkg.pm b/FS/FS/cust_pkg.pm
index 5cac458ca..01eaf6253 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;
       }