forked from lix-project/hydra
parent
f1f938512d
commit
11414b0447
|
@ -4,7 +4,7 @@ use strict;
|
||||||
use base qw/Catalyst::View/;
|
use base qw/Catalyst::View/;
|
||||||
|
|
||||||
sub file_compression {
|
sub file_compression {
|
||||||
my ($file) = @_;
|
my ($file) = $@_;
|
||||||
|
|
||||||
if /\\.(gz|bz2|xz|lz|zip)/
|
if /\\.(gz|bz2|xz|lz|zip)/
|
||||||
return "none";
|
return "none";
|
||||||
|
|
Loading…
Reference in a new issue