X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FGruntmaster%2FPage%2FCSS.pm;h=912e948a03600febf1f189a3dc3fe9126d2c389d;hb=a122bb9b5954e4384b8f1c3f52bcdda74b421f25;hp=0f4bf6a8193c88b2ee55f96d17285687670e0eaf;hpb=eac599be8b36a2a10e34942b3cdcaeac269cf4ef;p=gruntmaster-page.git

diff --git a/lib/Gruntmaster/Page/CSS.pm b/lib/Gruntmaster/Page/CSS.pm
index 0f4bf6a..912e948 100644
--- a/lib/Gruntmaster/Page/CSS.pm
+++ b/lib/Gruntmaster/Page/CSS.pm
@@ -1,23 +1,15 @@
 package Gruntmaster::Page::CSS;
 
-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 CSS::Minifier::XS qw/minify/;
 
 sub generate{
-	my ($self, $format, $logger, $theme) = @_;
-	debug $logger => "theme is $theme";
+	my ($self, $format, $env, $theme) = @_;
+	debug $env => "theme is $theme";
+	return [404, ['Content-Type' => 'text/plain'], [ 'Not found' ]] unless -e "css/themes/$theme.css";
 	my $css = read_file "css/themes/$theme.css";
 	$css .= read_file $_ for <css/*.css>;
-	[200, ['Content-Type' => 'text/css', 'Cache-Control' => 'public, max-age=604800'], [minify $css] ]
+	[200, ['Content-Type' => 'text/css', 'Cache-Control' => 'public, max-age=604800', 'X-Forever' => 1], [minify $css] ]
 }
 
-sub variants{ [[css => 1, 'text/css', undef, undef, undef, undef]] }
-
 1