Update version for JavaScript::Packed to handle some gnarly JS. Fixes bug #11034.

This commit is contained in:
Colin Kuskie 2010-01-19 09:05:56 -08:00
parent d04d457d44
commit ea53dcc037
4 changed files with 1138 additions and 2 deletions

View file

@ -16,7 +16,8 @@ use lib "$FindBin::Bin/../lib";
use WebGUI::Test;
use WebGUI::Session;
use Test::More tests => 18; # increment this value for each test you create
use Test::More tests => 21; # increment this value for each test you create
use Test::Exception;
use WebGUI::Asset::Snippet;
my $session = WebGUI::Test->session;
@ -101,6 +102,28 @@ is $snippet->view, 'Cache test: 1', 'validate snippet content and set cache';
$session->user({userId => 3});
is $snippet->view(1), 'Cache test: 3', 'receive uncached content since view was passed the webMethod flag';
#----------------------------------------------------------------------
#Check packing
my $snippet2 = $node->addChild({className => 'WebGUI::Asset::Snippet'});
my $tag2 = WebGUI::VersionTag->getWorking($session);
$snippet2->update({mimeType => 'text/javascript'});
$tag2->commit;
addToCleanup($tag2);
open my $JSFILE, WebGUI::Test->getTestCollateralPath('jquery.js')
or die "Unable to open jquery test collateral file: $!";
my $jquery;
{
undef $/;
$jquery = <$JSFILE>;
};
close $JSFILE;
is $snippet2->get('snippetPacked'), undef, 'no packed content';
lives_ok { $snippet2->update({snippet => $jquery}); } 'did not die during packing jquery';
ok $snippet2->get('snippetPacked'), 'snippet content was packed';
TODO: {
local $TODO = "Tests to make later";
ok(0, 'Test indexContent method');