sub error {
print STDERR $_[1], "\n";
}
+sub logger {
+}
package main;
use Sesse::pr0n::Common;
}
}
next unless $any_old;
- unlink (@files);
+ unlink (@files) or die "Could not delete: $!";
if (scalar @noboxres > 0) {
Sesse::pr0n::Common::ensure_cached($r, $ref->{'filename'}, $id, $ref->{'width'}, $ref->{'height'}, sort_res(@noboxres));
}