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

use PseudoRequest to stop some test warnings

Browse source
This commit is contained in:
Colin Kuskie 2009-02-10 20:24:34 +00:00
parent 2482c0f89f
commit 5d8ede926c
1 changed files with 1 additions and 16 deletions
Download patch file Download diff file Expand all files Collapse all files

17
t/Asset/AssetPackage.t
View file

@ -55,7 +55,7 @@ my $snippet = $folder->addChild({
});
my $packageAssetId = $folder->getId;
hack_session_request($session, $packageAssetId);
$session->request->setup_body({ assetId => $packageAssetId });
my $targetFolderChildren;
$targetFolderChildren = $targetFolder->getLineage(["children"], {returnObjects => 1,});
@ -85,21 +85,6 @@ TODO: {
ok(0, 'Check package deployment with 2-level package and look for new style templates propagating down the tree');
}
##This allows us to place an arbitrary assetId inside the form processor.
##This is required for deploying a package.
sub hack_session_request {
my ($session, $id) = @_;
my $request = Test::MockObject->new();
$request->mock('body',
sub {
return $id
},
);
$request->mock('param', sub { shift->body(@_) });
$session->{_request} = $request;
}
END {
foreach my $tag($versionTag, $newVersionTag) {
if (defined $tag and ref $tag eq 'WebGUI::VersionTag') {