More Macro test maintenance. Up through LastModified.

This commit is contained in:
Colin Kuskie 2009-10-31 14:37:15 -07:00
parent 5ea3f02520
commit 3b11493744
7 changed files with 14 additions and 71 deletions

View file

@ -15,6 +15,7 @@ use lib "$FindBin::Bin/../lib";
use WebGUI::Test;
use WebGUI::Session;
use WebGUI::Storage;
use WebGUI::Macro::Include;
use Test::More; # increment this value for each test you create
@ -85,18 +86,10 @@ my @testSets = (
my $numTests = scalar @testSets;
$numTests += 1; #For the use_ok
$numTests += 1; #For the unreadable file test
plan tests => $numTests;
my $macro = 'WebGUI::Macro::Include';
my $loaded = use_ok($macro);
SKIP: {
skip "Unable to load $macro", $numTests-1 unless $loaded;
foreach my $testSet (@testSets) {
my $output = WebGUI::Macro::Include::process($session, $testSet->{file});
is($output, $testSet->{output}, $testSet->{comment} . ":" .$testSet->{file});
@ -109,8 +102,3 @@ SKIP: {
my $output = WebGUI::Macro::Include::process($session, $file);
is($output, $i18n->get('not found'), q|Unreadable file returns NOT FOUND|. ":" .$file);
}
}
END {
}