+++ /dev/null
-package Gruntmaster::Page::Src;
-
-use Gruntmaster::Page::Base;
-
-use constant CONTENT_TYPES => +{
- c => 'text/x-csrc',
- cpp => 'text/x-c++src',
- cs => 'text/x-chsarp', # Used by GNOME. Not in mime.types.
- java => 'text/x-java',
- pas => 'text/x-pascal',
- pl => 'text/x-perl',
- py => 'text/x-python',
-};
-
-sub generate{
- my ($self, $format, $env, $job, $ext) = @_;
- debug $env => "Job is $job and extension is $ext";
-
- [200, ['Content-Type' => CONTENT_TYPES->{$ext}, 'Cache-Control' => 'max-age=604800', 'X-Forever' => 1], [db($env)->job($job)->source] ]
-}
-
-1