lei up --all: avoid double-close on shared STDOUT

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

diff --git a/lib/PublicInbox/LeiUp.pm b/lib/PublicInbox/LeiUp.pm
index e1da64aa3847e766a1b983af97b6aa14ebba1660..a39d6047a26cab1c5e7db999271118f5b513aabe 100644 (file)
--- a/lib/PublicInbox/LeiUp.pm
+++ b/lib/PublicInbox/LeiUp.pm
@@ -54,6 +54,10 @@ sub up1_redispatch {
        $l->{opt} = { %{$l->{opt}} };
        delete $l->{sock};
        $l->{''} = $op_p; # daemon only
+
+       # make close($l->{1}) happy in lei->dclose
+       open my $fh, '>&', $l->{1} or return $l->child_error(0, "dup: $!");
+       $l->{1} = $fh;
        eval {
                $l->qerr("# updating $out");
                up1($l, $out);