processpipe: allow synchronous close to set $?

[public-inbox.git] / lib / PublicInbox / MboxReader.pm

diff --git a/lib/PublicInbox/MboxReader.pm b/lib/PublicInbox/MboxReader.pm
index 1894756de3841cda2d059221cdadd9c741cab5a5..59ce4fb624d57000fcf6a913c9072e927486f483 100644 (file)
--- a/lib/PublicInbox/MboxReader.pm
+++ b/lib/PublicInbox/MboxReader.pm
@@ -5,7 +5,6 @@
 package PublicInbox::MboxReader;
 use strict;
 use v5.10.1;
-use PublicInbox::DS (); # localize $in_loop for error detection :<
 use Data::Dumper;
 $Data::Dumper::Useqq = 1; # should've been the default, for bad data
 
@@ -14,7 +13,6 @@ my $from_strict =
 
 sub _mbox_from {
        my ($mbfh, $from_re, $eml_cb, @arg) = @_;
-       local $PublicInbox::DS::in_loop; # disable dwaitpid
        my $buf = '';
        my @raw;
        while (defined(my $r = read($mbfh, $buf, 65536, length($buf)))) {
@@ -75,7 +73,6 @@ sub _extract_hdr {
 
 sub _mbox_cl ($$$;@) {
        my ($mbfh, $uxs_from, $eml_cb, @arg) = @_;
-       local $PublicInbox::DS::in_loop; # disable dwaitpid
        my $buf = '';
        while (defined(my $r = read($mbfh, $buf, 65536, length($buf)))) {
                if ($r == 0) { # detect "curl --fail"