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

7
t/Macro/FileUrl.t
View file

@ -93,15 +93,13 @@ plan tests => $numTests;
my $macro = 'WebGUI::Macro::FileUrl';
my $loaded = use_ok($macro);
my $versionTag;
SKIP: {
skip "Unable to load $macro", $numTests-1 unless $loaded;
my $homeAsset = WebGUI::Asset->getDefault($session);
($versionTag, @testSets) = setupTest($session, $homeAsset, @testSets);
my ($versionTag, @testSets) = setupTest($session, $homeAsset, @testSets);
foreach my $testSet (@testSets) {
my $output = WebGUI::Macro::FileUrl::process($session, $testSet->{url});
@ -147,10 +145,9 @@ sub setupTest {
++$testNum;
}
$versionTag->commit;
WebGUI::Test->tagsToRollback($versionTag);
return $versionTag, @testSets;
}
END { ##Clean-up after yourself, always
use Data::Dumper;
$versionTag->rollback;
}