[gruntmaster-page.git] / lib / Gruntmaster / Page / JS.pm

package Gruntmaster::Page::JS;

use 5.014000;
use strict;
use warnings;
use Gruntmaster::Page::Base;
our @ISA = qw/Gruntmaster::Page::Base/;
our $VERSION = '0.001';

use File::Slurp qw/read_file/;
use JavaScript::Minifier::XS qw/minify/;

sub generate{
	my ($self, $format, $env) = @_;
	debug $env => "";
	my $js;
	$js .= read_file $_ for <js/*.js>;
	[200, ['Content-Type' => 'application/javascript', 'Cache-Control' => 'public, max-age=604800', 'X-Forever' => 1], [minify $js] ]
}

1
Commit	Line	Data
7dc32473 MG	1	package Gruntmaster::Page::JS;
	2
	3	use 5.014000;
	4	use strict;
	5	use warnings;
	6	use Gruntmaster::Page::Base;
	7	our @ISA = qw/Gruntmaster::Page::Base/;
	8	our $VERSION = '0.001';
	9
	10	use File::Slurp qw/read_file/;
	11	use JavaScript::Minifier::XS qw/minify/;
	12
	13	sub generate{
191f4979 MG	14	my ($self, $format, $env) = @_;
191f4979 MG	15	debug $env => "";
7dc32473 MG	16	my $js;
7dc32473 MG	17	$js .= read_file $_ for <js/*.js>;
f65bc88e	18	[200, ['Content-Type' => 'application/javascript', 'Cache-Control' => 'public, max-age=604800', 'X-Forever' => 1], [minify $js] ]
7dc32473 MG	19	}
7dc32473 MG	20
7dc32473	21	1