no zombie forks a test criteria

This commit is contained in:
Scott Walters 2011-05-03 18:14:23 -04:00
parent d6ad0852e8
commit 3e59d0f8fe
2 changed files with 4 additions and 1 deletions

View file

@ -23,6 +23,8 @@ use WebGUI::Session;
use WebGUI::AssetHelper::ChangeUrl;
use WebGUI::Test::Mechanize;
$SIG{HUP} = sub { use Carp; confess "hup"; };
#----------------------------------------------------------------------------
# Init
my $session = WebGUI::Test->session;

View file

@ -83,7 +83,8 @@ $mech->submit_form_ok({
fields => {
},
});
WebGUI::Test->waitForAllForks;
ok(WebGUI::Test->waitForAllForks(10), "Forks finished");
ok( -e File::Spec->catfile( $dir->dirname, 'top', 'index.html' ), 'top export exists' );
ok( -e File::Spec->catfile( $dir->dirname, 'top', 'child', 'index.html' ), 'child export exists' );