X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FPlack%2FApp%2FGruntmaster.pm;h=c02e7dd3f023cbdbd84c402f36cc0d85cabbcd06;hb=7e8f9a5c2eaddad49aebc6911706533ef64db1eb;hp=c9965d08a46894e02b5aa61cdbf89087c28d9000;hpb=6533844f1a2ec6b162b696c31a623a4dc8ee72bb;p=plack-app-gruntmaster.git diff --git a/lib/Plack/App/Gruntmaster.pm b/lib/Plack/App/Gruntmaster.pm index c9965d0..c02e7dd 100644 --- a/lib/Plack/App/Gruntmaster.pm +++ b/lib/Plack/App/Gruntmaster.pm @@ -14,9 +14,6 @@ use Web::Simple; use Gruntmaster::Data; use Plack::App::Gruntmaster::HTML; -use Email::Sender::Simple qw/sendmail/; -use Email::Simple; - use warnings NONFATAL => 'all'; no warnings 'illegalproto'; @@ -29,6 +26,7 @@ use constant CONTENT_TYPES => +{ cpp => 'text/x-c++src', cs => 'text/x-csharp', # Used by GNOME. Not in mime.types. go => 'text/plain', # ? + gs => 'text/plain', hs => 'text/x-haskell', java => 'text/x-java', pas => 'text/x-pascal', @@ -43,6 +41,7 @@ use constant FORMAT_EXTENSION => { CPP => 'cpp', GCCGO => 'go', GOLANG => 'go', + GOLFSCRIPT => 'gs', HASKELL => 'hs', MONO => 'cs', JAVA => 'java', @@ -118,7 +117,7 @@ sub dispatch_request{ $vary .= ', Authorization' if $privacy eq 'private'; my @hdrs = ('X-Forever' => 1, 'Cache-Control' => "$privacy, max-age=$r->{maxage}", Vary => $vary); return [200, ['Content-Type' => 'application/json; charset=utf-8', @hdrs], [encode_json $r->{params}]] if $format eq 'json'; - my $ret = render $r->{template}, 'en', title => $r->{title}, %{$r->{params}}, maybe static => $env->{HTTP_X_STATIC} + 1; + my $ret = render $r->{template}, 'en', title => $r->{title}, %{$r->{params}}, maybe static => $env->{HTTP_X_STATIC}; [200, ['Content-Type' => 'text/html; charset=utf-8', @hdrs], [encode 'UTF-8', $ret]] }, },