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

Fill out FilePump macro tests and fix bugs.

Browse source
This commit is contained in:
Colin Kuskie 2009-05-18 17:57:20 +00:00
parent d8a1623ea0
commit de3b249a2b
2 changed files with 102 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

73
t/Macro/FilePump.t
View file

@ -28,7 +28,7 @@ my $session = WebGUI::Test->session;
#----------------------------------------------------------------------------
# Tests
my $tests = 0;
my $tests = 6;
plan tests => 1 + $tests;
#----------------------------------------------------------------------------
@ -43,6 +43,77 @@ SKIP: {
skip "Unable to load $macro", $tests unless $loaded;
my $root = WebGUI::Asset->getRoot($session);
my $snippet = $root->addChild({
className => 'WebGUI::Asset::Snippet',
url => 'filePumpSnippet',
snippet => qq|\n\nfunction doNothing()\n{ var foo = 'bar';} |,
});
my $fileAsset = $root->addChild({
className => 'WebGUI::Asset::File',
url => 'filePumpFileAsset',
filename => 'pumpfile',
});
$fileAsset->getStorageLocation->addFileFromScalar('pumpfile.css', qq| body {\npadding: 0px;}\n\n|);
my $snippetTag = WebGUI::VersionTag->getWorking($session);
WebGUI::Test->tagsToRollback($snippetTag);
$snippetTag->commit;
$bundle->addFile('JS', 'asset://filePumpSnippet');
$bundle->addFile('CSS', 'asset://filePumpFileAsset');
my $storedFile = WebGUI::Storage->create($session);
WebGUI::Test->storagesToDelete($storedFile);
$storedFile->addFileFromScalar('storedJS.js', qq|function helloWorld() { alert("Hellow world");}|, );
$bundle->addFile('JS', 'file:'. $storedFile->getPath('storedJS.js'));
my $uploadsURL = $session->config->get('uploadsURL');
$bundle->build();
is(
WebGUI::Macro::FilePump::process($session, 'test bundle', 'JS'),
sprintf(qq|<script type="text/javascript" src="%s">\n|,
join('/', $uploadsURL, 'filepump', $bundle->bundleUrl . '.'. $bundle->get('lastBuild'), $bundle->bundleUrl.'.js'),
),
'... check JS file, normal mode'
);
is(
WebGUI::Macro::FilePump::process($session, 'test bundle', 'CSS'),
sprintf(qq|<link rel="stylesheet" type="text/css" href="%s">\n|,
join('/', $uploadsURL, 'filepump', $bundle->bundleUrl . '.'. $bundle->get('lastBuild'), $bundle->bundleUrl.'.css'),
),
'... check CSS file, normal mode'
);
is(
WebGUI::Macro::FilePump::process($session, 'test bundle', 'OTHER'),
'',
'... check illegal file type access returns empty string'
);
$session->var->switchAdminOn();
is(
WebGUI::Macro::FilePump::process($session, 'test bundle', 'JS'),
sprintf(qq|<script type="text/javascript" src="%s">\n<script type="text/javascript" src="%s">\n|,
'/filePumpSnippet', $storedFile->getUrl('storedJS.js')
),
'... check JS file, normal mode'
);
is(
WebGUI::Macro::FilePump::process($session, 'test bundle', 'CSS'),
sprintf(qq|<link rel="stylesheet" type="text/css" href="/filePumpFileAsset">\n|, $fileAsset->getUrl),
'... check CSS file, normal mode'
);
is(
WebGUI::Macro::FilePump::process($session, 'test bundle', 'OTHER'),
'',
'... check illegal file type access returns empty string'
);
}