no zombie forks a test criteria
This commit is contained in:
parent
d6ad0852e8
commit
3e59d0f8fe
2 changed files with 4 additions and 1 deletions
|
|
@ -23,6 +23,8 @@ use WebGUI::Session;
|
||||||
use WebGUI::AssetHelper::ChangeUrl;
|
use WebGUI::AssetHelper::ChangeUrl;
|
||||||
use WebGUI::Test::Mechanize;
|
use WebGUI::Test::Mechanize;
|
||||||
|
|
||||||
|
$SIG{HUP} = sub { use Carp; confess "hup"; };
|
||||||
|
|
||||||
#----------------------------------------------------------------------------
|
#----------------------------------------------------------------------------
|
||||||
# Init
|
# Init
|
||||||
my $session = WebGUI::Test->session;
|
my $session = WebGUI::Test->session;
|
||||||
|
|
|
||||||
|
|
@ -83,7 +83,8 @@ $mech->submit_form_ok({
|
||||||
fields => {
|
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', 'index.html' ), 'top export exists' );
|
||||||
ok( -e File::Spec->catfile( $dir->dirname, 'top', 'child', 'index.html' ), 'child export exists' );
|
ok( -e File::Spec->catfile( $dir->dirname, 'top', 'child', 'index.html' ), 'child export exists' );
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue