diff options
author | Eric Wong <e@80x24.org> | 2021-03-29 17:47:17 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2021-03-29 19:57:35 -0400 |
commit | c92e535cbb0fdb0f61df6ab0ceab370119d9467a (patch) | |
tree | 907d7752864a6d0f01b3dd50c81bc5b7ba502c43 | |
parent | d326b75c07c6d79547c045cb08163f9d40b245b9 (diff) | |
download | public-inbox-c92e535cbb0fdb0f61df6ab0ceab370119d9467a.tar.gz |
$lei->fail sends SIGTERM which prevents the File::Temp::Dir in $solver->{tmp} from being cleaned up, so use $lei->child_error instead.
-rw-r--r-- | lib/PublicInbox/LeiBlob.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/PublicInbox/LeiBlob.pm b/lib/PublicInbox/LeiBlob.pm index 91098a90..6195b368 100644 --- a/lib/PublicInbox/LeiBlob.pm +++ b/lib/PublicInbox/LeiBlob.pm @@ -39,7 +39,7 @@ sub solver_user_cb { # called by solver when done my $lei = $self->{lei}; my $log_buf = delete $lei->{'log_buf'}; $$log_buf =~ s/^/# /sgm; - ref($res) eq 'ARRAY' or return $lei->fail($$log_buf); + ref($res) eq 'ARRAY' or return $lei->child_error(1 << 8, $$log_buf); $lei->qerr($$log_buf); my ($git, $oid, $type, $size, $di) = @$res; my $gd = $git->{git_dir}; |