diff --git a/tests/protocol/test-launch-race.pl b/tests/protocol/test-launch-race.pl index 6fef1a5d1..f522cc115 100755 --- a/tests/protocol/test-launch-race.pl +++ b/tests/protocol/test-launch-race.pl @@ -42,7 +42,9 @@ if ($pid == 0) { my $g = Sys::Guestfs->new (); $g->add_drive ("/dev/null"); $g->launch (); - _exit (0); # So the tmpdir is not removed. + $g->close (); + # So $tmpdir is not removed by CLEANUP => 1 above. + _exit (0); } my $g = Sys::Guestfs->new ();