oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Debug needs an explicit package name for addToCleanup.

Browse source
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
Download patch file Download diff file Expand all files Collapse all files

4
t/AssetHelper/CopyBranch.t
View file

@ -56,7 +56,7 @@ my $grand = $child->addChild({
%tag,
});
$tag->commit;
addToCleanup( $tag );
WebGUI::Test->addToCleanup( $tag );
{
my $helper = WebGUI::AssetHelper::CopyBranch->new( id => 'copy_branch', session => $session, asset => $top );
@ -88,6 +88,6 @@ $mech->get_ok( '/?op=assetHelper;helperId=copy_branch;method=copy;with=descendan
WebGUI::Test->waitForAllForks;
my $clippies = $root->getLineage(["descendants"], {statesToInclude => [qw{clipboard clipboard-limbo}], returnObjects => 1,});
is @{ $clippies }, 3, '... copied 3 asset to the clipboard';
addToCleanup( @$clippies );
WebGUI::Test->addToCleanup( @$clippies );
#vim:ft=perl