X-Git-Url: https://git.sesse.net/?p=pr0n;a=blobdiff_plain;f=perl%2Fupdate-image-cache.pl;h=0ed6931bfe63ca4a2fcf648fa3e03202d765360b;hp=f26ba99721a25224cc2664ddd8dca4ecfd78aa39;hb=3302d279442feb859579d6be6b8feb9adee34418;hpb=e39f752cca70404407db9cfadb743636e0f3cc1e

diff --git a/perl/update-image-cache.pl b/perl/update-image-cache.pl
index f26ba99..0ed6931 100755
--- a/perl/update-image-cache.pl
+++ b/perl/update-image-cache.pl
@@ -118,7 +118,7 @@ while (my $ref = $q->fetchrow_hashref) {
 		}
 	}
 	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));
 	}