summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorjeff <jeff>2008-12-16 00:08:23 +0000
committerjeff <jeff>2008-12-16 00:08:23 +0000
commitd50f5d9f6105536e1c65eea5c0129494bed4f154 (patch)
tree30fc9408672a0d0768156f9376c8dfdd5f5cbf99
parent15a20c32c0314b189e6b7fd048e775e75cc7d384 (diff)
proper dates on expire and suspend reasons
-rw-r--r--FS/FS/cust_pkg.pm2
1 files changed, 2 insertions, 0 deletions
diff --git a/FS/FS/cust_pkg.pm b/FS/FS/cust_pkg.pm
index e359fc9fc..6807383d9 100644
--- a/FS/FS/cust_pkg.pm
+++ b/FS/FS/cust_pkg.pm
@@ -551,6 +551,7 @@ sub cancel {
if ( $options{'reason'} ) {
$error = $self->insert_reason( 'reason' => $options{'reason'},
'action' => $date ? 'expire' : 'cancel',
+ 'date' => $date,
'reason_otaker' => $options{'reason_otaker'},
);
if ( $error ) {
@@ -751,6 +752,7 @@ sub suspend {
if ( $options{'reason'} ) {
$error = $self->insert_reason( 'reason' => $options{'reason'},
'action' => $date ? 'adjourn' : 'suspend',
+ 'date' => $date,
'reason_otaker' => $options{'reason_otaker'},
);
if ( $error ) {