X-Git-Url: https://git.sesse.net/?a=blobdiff_plain;ds=sidebyside;f=perl%2Fupdate-image-cache.pl;h=0ed6931bfe63ca4a2fcf648fa3e03202d765360b;hb=refs%2Fheads%2Fmaster;hp=f26ba99721a25224cc2664ddd8dca4ecfd78aa39;hpb=e39f752cca70404407db9cfadb743636e0f3cc1e;p=pr0n diff --git a/perl/update-image-cache.pl b/perl/update-image-cache.pl index f26ba99..f50d3a0 100755 --- a/perl/update-image-cache.pl +++ b/perl/update-image-cache.pl @@ -103,7 +103,6 @@ while (my $ref = $q->fetchrow_hashref) { if (!$regen_mipmaps) { @files = grep { !/mipmap/ } @files; } - my @boxres = (); my @noboxres = (); my $any_old = 0; for my $c (@files) { @@ -113,18 +112,13 @@ while (my $ref = $q->fetchrow_hashref) { } if ($c =~ /$id-(\d+)-(\d+)-nobox\.jpg/ || $c =~ /$id-(-1)-(-1)-nobox\.jpg/) { push @noboxres, [$1, $2]; - } elsif ($c =~ /$id-(\d+)-(\d+)-box\.png/ || $c =~ /$id-(-1)-(-1)-box\.png/) { - push @boxres, [$1, $2]; } } 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)); } - if (scalar @boxres > 0) { - Sesse::pr0n::Common::ensure_infobox_cached($r, $ref->{'filename'}, $id, $ref->{'width'}, $ref->{'height'}, 1, sort_res(@boxres)); - } my @newfiles = glob("../cache/$dir/$id-*.jpg"); my %a = map { $_ => 1 } @files;