- error(500,'Unable to create File::LibMagic object');
- my $mime_string = $m->checktype_filename($cache_location) or
- error(500,'Bad file; no mime known');
+ error($q,500,'Unable to create File::LibMagic object');
+ my $mime_string = $m->checktype_filename(abs_path($cache_location)) or
+ error($q,500,'Bad file; no mime known');