sub ensure_disk_location_exists {
my ($r, $id) = @_;
- my $dir = POSIX::floor($id / 256);
+ my $dir = POSIX::floor($id / 256);
my $img_dir = get_base($r) . "/images/$dir/";
if (! -d $img_dir) {
}
$regex .= "(\\?.*)?\$";
$r->headers_out->{'X-Pr0n-Purge'} = $regex;
-
- $r->log->info($r->headers_out->{'X-Pr0n-Purge'});
}
# Find a list of all cache URLs for a given image, given what we have on disk.