Debug needs an explicit package name for addToCleanup.

This commit is contained in:
Colin Kuskie 2011-10-19 13:11:23 -07:00
parent 19b6f9de12
commit 82bb59d40e
47 changed files with 99 additions and 99 deletions

View file

@ -54,7 +54,7 @@ my $root = WebGUI::Asset->getRoot($session);
'AssetHelper/Copy forks a process'
);
addToCleanup( 'WebGUI::Fork' => $output->{forkId} );
WebGUI::Test->addToCleanup( 'WebGUI::Fork' => $output->{forkId} );
}
ok(WebGUI::Test->waitForAllForks(10), "Forks finished");
@ -62,6 +62,6 @@ ok(WebGUI::Test->waitForAllForks(10), "Forks finished");
$session->cache->clear;
my $clippies = $root->getLineage(["descendants"], {statesToInclude => [qw{clipboard clipboard-limbo}], returnObjects => 1,});
is @{ $clippies }, 1, '... only copied 1 asset to the clipboard, no children';
addToCleanup(@{ $clippies });
WebGUI::Test->addToCleanup(@{ $clippies });
#vim:ft=perl