forked from lix-project/hydra
Merge pull request #1268 from knedlsepp/fix-mime
Fix MIME types when serving .js and .css to fix rendering of HTML reports
This commit is contained in:
commit
8f48e4ddec
|
@ -238,9 +238,17 @@ sub serveFile {
|
||||||
"store", "cat", "--store", getStoreUri(), "$path"]) };
|
"store", "cat", "--store", getStoreUri(), "$path"]) };
|
||||||
|
|
||||||
# Detect MIME type.
|
# Detect MIME type.
|
||||||
|
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;
|
||||||
|
} else {
|
||||||
state $magic = File::LibMagic->new(follow_symlinks => 1);
|
state $magic = File::LibMagic->new(follow_symlinks => 1);
|
||||||
my $info = $magic->info_from_filename($path);
|
my $info = $magic->info_from_filename($path);
|
||||||
my $type = $info->{mime_with_encoding};
|
$type = $info->{mime_with_encoding};
|
||||||
|
}
|
||||||
$c->response->content_type($type);
|
$c->response->content_type($type);
|
||||||
$c->forward('Hydra::View::Plain');
|
$c->forward('Hydra::View::Plain');
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in a new issue