diff options
author | ivan <ivan> | 2011-03-16 08:41:21 +0000 |
---|---|---|
committer | ivan <ivan> | 2011-03-16 08:41:21 +0000 |
commit | 9af963b15bfcdf5138013dd354dd066799d84e0c (patch) | |
tree | 4b90a6cead5dd183a5ec17805cf4227a2b36e113 /bin | |
parent | f82dc3d547816ca36165e224570edb5edd95631f (diff) |
really fix start date
Diffstat (limited to 'bin')
-rwxr-xr-x | bin/b-move-customers | 6 |
1 files 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 ) { |