convert all test cleanup to addToCleanup

This commit is contained in:
Graham Knop 2010-06-09 17:37:10 -05:00
parent 421b9652cf
commit 4c18ba3563
82 changed files with 190 additions and 307 deletions

View file

@ -273,12 +273,12 @@ my $fileAsset = $root->addChild({
$fileAsset->getStorageLocation->addFileFromScalar('pumpfile', 'Pump up the jam');
my $storage = WebGUI::Storage->create($session);
WebGUI::Test->storagesToDelete($storage);
WebGUI::Test->addToCleanup($storage);
$storage->addFileFromScalar('addendum', 'Red was too');
$storage->addFileFromFilesystem(WebGUI::Test->getTestCollateralPath('ShawshankRedemptionMoviePoster.jpg'));
my $snippetTag = WebGUI::VersionTag->getWorking($session);
WebGUI::Test->tagsToRollback($snippetTag);
WebGUI::Test->addToCleanup($snippetTag);
$snippetTag->commit;
my $guts;