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

Forward porting tests with better cleanups.

Browse source
This commit is contained in:
Colin Kuskie 2009-05-25 04:42:40 +00:00
parent a054c9de73
commit 689e645e51
3 changed files with 5 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

2
t/Asset/Wobject/DataForm/DataForm.t
View file

@ -40,6 +40,7 @@ my $node = WebGUI::Asset->getImportNode($session);
my $versionTag = WebGUI::VersionTag->getWorking($session);
$versionTag->set({name=>"Article Test"});
WebGUI::Test->tagsToRollback($versionTag);
my $article = $node->addChild({className=>'WebGUI::Asset::Wobject::Article'});
# Test for a sane object type
@ -99,6 +100,7 @@ $duplicateArticle->purge();
# The get method will create the directory if it doesnt exist... very strange.
$duplicateStorage = WebGUI::Storage->get($session,$duplicateStorageId);
WebGUI::Test->storagesToDelete($duplicateStorage);
# so lets check for the file instead
$duplicateFilename = $duplicateStorage->getFiles->[0];