[freeside-commits] freeside/FS/FS cust_pkg.pm,1.73.2.24,1.73.2.25

[Jeff Finucane,420,,]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv4642

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	cust_pkg.pm 
Log Message:
proper dates on expire and suspend reasons

Index: cust_pkg.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_pkg.pm,v
retrieving revision 1.73.2.24
retrieving revision 1.73.2.25
diff -u -d -r1.73.2.24 -r1.73.2.25
--- cust_pkg.pm	11 Oct 2008 00:32:21 -0000	1.73.2.24
+++ cust_pkg.pm	16 Dec 2008 00:08:56 -0000	1.73.2.25
@@ -486,6 +486,7 @@
   if ($options{'reason'}) {
     $error = $self->insert_reason( 'reason' => $options{'reason'},
                                    'action' => $date ? 'expire' : 'cancel',
+                                   'date'   => $date,
                                    'reason_otaker' => $options{'reason_otaker'},
                                  );
     if ( $error ) {
@@ -663,6 +664,7 @@
   if ($options{'reason'}) {
     $error = $self->insert_reason( 'reason' => $options{'reason'},
                                    'action' => $date ? 'adjourn' : 'suspend',
+                                   'date'   => $date,
                                    'reason_otaker' => $options{'reason_otaker'},
                                  );
     if ( $error ) {