From 8f1fcb5c5409da6c9cfb9ff21d451853a7579db8 Mon Sep 17 00:00:00 2001 From: Mark Wells Date: Mon, 15 Jul 2013 18:57:05 -0700 Subject: [PATCH] minor fix --- FS/FS/cust_pkg.pm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) 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; } -- 2.11.0