summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xbin/b-move-customers3
1 files changed, 3 insertions, 0 deletions
diff --git a/bin/b-move-customers b/bin/b-move-customers
index c17046b..411846f 100755
--- a/bin/b-move-customers
+++ b/bin/b-move-customers
@@ -256,6 +256,9 @@ 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 ) {