X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FGruntmaster%2FPage%2FBase.pm;h=ee8a3101768148125a468ce5bb71f55d5348ad4c;hb=9e1979aeb2725b7548115832fa696393772340bd;hp=9622d2ae621849d2f7be00e8c673953f2e09cd6c;hpb=514a5a0e5b47b39e45b2d1730777372e5ead529d;p=plack-app-gruntmaster.git
diff --git a/lib/Gruntmaster/Page/Base.pm b/lib/Gruntmaster/Page/Base.pm
index 9622d2a..ee8a310 100644
--- a/lib/Gruntmaster/Page/Base.pm
+++ b/lib/Gruntmaster/Page/Base.pm
@@ -31,7 +31,7 @@ sub import {
local $Log::Log4perl::caller_depth = $Log::Log4perl::caller_depth + 1;
$_[0]->{'psgix.logger'}->({qw/level debug message/ => $_[1]})
};
- *{"${caller}::reply"} = sub { [200, ['Content-Type' => 'text/plain'], [ @_ ] ] };
+ *{"${caller}::reply"} = sub { [200, ['Content-Type' => 'text/plain', 'Cache-Control' => 'no-cache'], [ @_ ] ] };
*{"${caller}::purge"} = sub {
return unless $ENV{PURGE_HOST};
my $req = HTTP::Request->new(PURGE => "http://$ENV{PURGE_HOST}$_[0]");
@@ -44,18 +44,19 @@ sub import {
my %orig_header_templates = (
en => <<'HTML',
-
TITLE_GOES_HERE
+TITLE_GOES_HERE | MindCoding
-
+
+