From 9af963b15bfcdf5138013dd354dd066799d84e0c Mon Sep 17 00:00:00 2001 From: ivan Date: Wed, 16 Mar 2011 08:41:21 +0000 Subject: [PATCH] really fix start date --- bin/b-move-customers | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/bin/b-move-customers b/bin/b-move-customers index 411846f3b..026e4cc35 100755 --- a/bin/b-move-customers +++ b/bin/b-move-customers @@ -201,6 +201,9 @@ while ( my $customerrow = $customer_sth->fetchrow_hashref ) { 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 @@ while ( my $customerrow = $customer_sth->fetchrow_hashref ) { '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 ) { -- 2.11.0