lib/PublicInbox/LeiConvert.pm | 18 ++++++------------ diff --git a/lib/PublicInbox/LeiConvert.pm b/lib/PublicInbox/LeiConvert.pm index b45de4e0fe0d227e0e3c9a51c2836aa5912f9ced..4839dea498c89d3d18e7e09a1aa1cfd5add589de 100644 --- a/lib/PublicInbox/LeiConvert.pm +++ b/lib/PublicInbox/LeiConvert.pm @@ -62,17 +62,6 @@ delete $lei->{1}; delete $self->{wcb}; # commit } -sub convert_start { - my ($lei) = @_; - my $self = $lei->{cnv}; - my $op = $lei->workers_start($self, 'lei_convert', 1, { - '' => [ $lei->can('dclose'), $lei ] - }); - $self->wq_io_do('do_convert', []); - $self->wq_close(1); - while ($op && $op->{sock}) { $op->event_step } -} - sub call { # the main "lei convert" method my ($cls, $lei, @inputs) = @_; my $opt = $lei->{opt}; @@ -131,7 +120,12 @@ } $nrd->{quiet} = $opt->{quiet}; $lei->{nrd} = $nrd; } - convert_start($lei); + my $op = $lei->workers_start($self, 'lei_convert', 1, { + '' => [ $lei->can('dclose'), $lei ] + }); + $self->wq_io_do('do_convert', []); + $self->wq_close(1); + while ($op && $op->{sock}) { $op->event_step } } sub ipc_atfork_child {