[freeside-commits] freeside/bin b-move-customers,1.3,1.4

Ivan,,, ivan at wavetail.420.am
Wed Mar 16 01:41:23 PDT 2011


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

Modified Files:
	b-move-customers 
Log Message:
really fix start date

Index: b-move-customers
===================================================================
RCS file: /home/cvs/cvsroot/freeside/bin/b-move-customers,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -w -d -r1.3 -r1.4
--- b-move-customers	16 Mar 2011 07:41:02 -0000	1.3
+++ b-move-customers	16 Mar 2011 08:41:21 -0000	1.4
@@ -201,6 +201,9 @@
     import_table( 'cust_pkg', 'custnum' => $src_custnum,
       'preinsert_callback' => sub {
         my($row, $object) = @_;
+
+        $object->start_date(''); #bogus start dates on all packages
+
         my $src_pkgpart = $row->{'pkgpart'} or die "wtf";
         my $dest_pkgpart = $map{'part_pkg'}->{$src_pkgpart};
         if ( $dest_pkgpart ) {
@@ -256,9 +259,6 @@
           'preinsert_callback' => sub {
 
             my($row, $object) = @_;
-
-            $object->start_date(''); #bogus start dates on all packages
-
             my $src_svcpart = $row->{'svcpart'} or die "wtf2";
             my $dest_svcpart = $map{'part_svc'}->{$src_svcpart};
             if ( $dest_svcpart ) {



More information about the freeside-commits mailing list