snaakey/hydra
0
0
Fork 0
forked from lix-project/hydra
Code Pull requests Activity

Detect MIME type

Browse source
This commit is contained in:
Eelco Dolstra 2017-10-18 13:38:34 +02:00
parent 42fbde0383
commit 30943dd217
No known key found for this signature in database
GPG key ID: 8170B4726D7198DE
1 changed files with 10 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
src/lib/Hydra/Controller/Build.pm
View file

@ -14,6 +14,7 @@ use Nix::Store;
use Nix::Config;
use List::MoreUtils qw(all);
use Encode;
use MIME::Types;
sub buildChain :Chained('/') :PathPart('build') :CaptureArgs(1) {
@ -242,7 +243,15 @@ sub download : Chained('buildChain') PathPart {
} else {
$c->stash->{'plain'} = { data => readNixFile($path) };
$c->response->content_type('application/octet-stream');
# Detect MIME type. Borrowed from Catalyst::Plugin::Static::Simple.
my $type = "text/plain";
if ($path =~ /.*\.(\S{1,})$/xms) {
my $ext = $1;
my $mimeTypes = MIME::Types->new(only_complete => 1);
my $t = $mimeTypes->mimeTypeOf($ext);
$type = ref $t ? $t->type : $t if $t;
}
$c->response->content_type($type);
$c->forward('Hydra::View::Plain');
}
}