X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=lib%2FPublicInbox%2FLeiToMail.pm;h=9c748deaed161db7b9e2b02674a521fcc6ce5e0a;hb=4b5a1b5787edee2a3b6cc10a3ccc5721f1414268;hp=d42759cf71d4d372612fdbc4c79efcf270533e1d;hpb=d0100ddd9fe00197cc846d83e70b7611c57dbf43;p=public-inbox.git diff --git a/lib/PublicInbox/LeiToMail.pm b/lib/PublicInbox/LeiToMail.pm index d42759cf..9c748dea 100644 --- a/lib/PublicInbox/LeiToMail.pm +++ b/lib/PublicInbox/LeiToMail.pm @@ -157,7 +157,7 @@ sub _post_augment_mbox { # open a compressor process from top-level process my $zsfx = $self->{zsfx} or return; my $cmd = PublicInbox::MboxReader::zsfx2cmd($zsfx, undef, $lei); my ($r, $w) = @{delete $lei->{zpipe}}; - my $rdr = { 0 => $r, 1 => $lei->{1}, 2 => $lei->{2} }; + my $rdr = { 0 => $r, 1 => $lei->{1}, 2 => $lei->{2}, pgid => 0 }; my $pid = spawn($cmd, undef, $rdr); my $pp = gensym; my $dup = bless { "pid.$pid" => $cmd }, ref($lei); @@ -796,7 +796,7 @@ sub augment_inprogress { "scanning old contents of $dst for dedupe" : "removing old contents of $dst")." ...\n"; }; - warn "E: $@" if $@; + warn "E: $@ ($dst)" if $@; } # called in top-level lei-daemon when LeiAuth is done