X-Git-Url: https://git.sesse.net/?p=pr0n;a=blobdiff_plain;f=perl%2FSesse%2Fpr0n%2FImage.pm;h=4e272fac5856d29d6af1e485e43d3ee4a656dd28;hp=6a4f7a80e71a64f2653d1a2d5d596a04c065aa18;hb=45ee05e19e1039e74e2b7ca4955b007d2cd3ed69;hpb=fd38bb6363334ccb1ed756ace442b59c5bdf6bd1 diff --git a/perl/Sesse/pr0n/Image.pm b/perl/Sesse/pr0n/Image.pm index 6a4f7a8..4e272fa 100644 --- a/perl/Sesse/pr0n/Image.pm +++ b/perl/Sesse/pr0n/Image.pm @@ -51,7 +51,12 @@ sub handler { $dbheight = $ref->{'height'}; # Scale if we need to do so - my ($fname, $mime_type) = Sesse::pr0n::Common::ensure_cached($r, $filename, $id, $dbwidth, $dbheight, $infobox, $dpr, $xres, $yres); + my ($fname, $mime_type); + if ($infobox) { + ($fname, $mime_type) = Sesse::pr0n::Common::ensure_infobox_cached($r, $filename, $id, $dbwidth, $dbheight, $dpr, $xres, $yres); + } else { + ($fname, $mime_type) = Sesse::pr0n::Common::ensure_cached($r, $filename, $id, $dbwidth, $dbheight, $dpr, $xres, $yres); + } # Output the image to the user my $res = Plack::Response->new(200);