dgit: Call forkcheck_setup in multisuite children

We want execute our SIGWARN handler in these explicitly created
children.

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/dgit b/dgit
index a18d0181542cdb9a0485ad239973a53f87cdcf43..f7f2b710b9732ae11b82a0b594b17301e56a26ad 100755 (executable)
--- a/dgit
+++ b/dgit
@@ -3321,6 +3321,7 @@ sub multisuite_suite_child ($$$) {
     my $canonsuitefh = IO::File::new_tmpfile;
     my $pid = fork // die $!;
     if (!$pid) {
     my $canonsuitefh = IO::File::new_tmpfile;
     my $pid = fork // die $!;
     if (!$pid) {

+       forkcheck_setup();

        $isuite = $tsuite;
        $us .= " [$isuite]";
        $debugprefix .= " ";
        $isuite = $tsuite;
        $us .= " [$isuite]";
        $debugprefix .= " ";