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

Partly fixed t/Macro/FilePump.t

Browse source
This commit is contained in:
Patrick Donelan 2009-07-16 02:23:15 +00:00
parent df611653ea
commit f4f55b4a7d
1 changed files with 16 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

25
t/Macro/FilePump.t
View file

@ -28,7 +28,7 @@ my $session = WebGUI::Test->session;
#----------------------------------------------------------------------------
# Tests
my $tests = 6;
my $tests = 11;
plan tests => 1 + $tests;
#----------------------------------------------------------------------------
@ -58,32 +58,39 @@ my $fileAsset = $root->addChild({
});
$fileAsset->getStorageLocation->addFileFromScalar('pumpfile.css', qq| body {\npadding: 0px;}\n\n|);
is($fileAsset->getStorageLocation->getFileContentsAsScalar($fileAsset->get('filename')), qq| body {\npadding: 0px;}\n\n|, 'Sanity check - got back expected file contents');
my $snippetTag = WebGUI::VersionTag->getWorking($session);
WebGUI::Test->tagsToRollback($snippetTag);
$snippetTag->commit;
$bundle->addFile('JS', 'asset://filePumpSnippet');
$bundle->addFile('CSS', 'asset://filePumpFileAsset');
ok($bundle->addFile('JS', 'asset://filePumpSnippet'), 'Added filePumpSnippet');
ok($bundle->addFile('CSS', 'asset://filePumpFileAsset'), 'Added filePumpAsset');
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'));
# Turn into file:uploads/path/to/fileAsset (bc file uris must begin with either file:uploads/ or file:extras/)
my $path = Path::Class::File->new($storedFile->getPath($storedFile->get('filename')));
my $uploadsDir = Path::Class::Dir->new($session->config->get('uploadsPath'));
$path = $path->relative($uploadsDir);
ok($bundle->addFile('JS', "file:uploads/$path/storedJS.js"), 'Added storedJS.js');
my $uploadsURL = $session->config->get('uploadsURL');
$bundle->build();
my ($code, $error) = $bundle->build;
ok($code, '... bundle built ok') or diag("Failed to fetch URI: $error");
is(
WebGUI::Macro::FilePump::process($session, 'test bundle', 'JS'),
sprintf(qq|<script type="text/javascript" src="%s">\n|,
sprintf(qq|<script type="text/javascript" src="%s" ></script>\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|,
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'
@ -97,14 +104,14 @@ is(
$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|,
sprintf(qq|<script type="text/javascript" src="%s" ></script>\n<script type="text/javascript" src="%s" ></script>\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),
sprintf(qq|<link rel="stylesheet" type="text/css" href="/filePumpFileAsset" >\n|, $fileAsset->getUrl),
'... check CSS file, normal mode'
);
is(