X-Git-Url: https://git.sesse.net/?p=pr0n;a=blobdiff_plain;f=perl%2FSesse%2Fpr0n%2FCommon.pm;h=73980c0b05738eb2cf97cc5781dd80d8b1737afe;hp=7cfe285dd16856edb26f6899b0deb5ab1a3a720d;hb=d7941742255f12b60f5cbfca83f32a5043add9b3;hpb=7d8c51d5e662a057027e71d11771f8c72b0a6020 diff --git a/perl/Sesse/pr0n/Common.pm b/perl/Sesse/pr0n/Common.pm index 7cfe285..73980c0 100644 --- a/perl/Sesse/pr0n/Common.pm +++ b/perl/Sesse/pr0n/Common.pm @@ -435,7 +435,11 @@ sub make_mipmap { if (! -r $mmlocation or (-M $mmlocation > -M $physical_fname)) { if (!defined($img)) { if (defined($last_good_mmlocation)) { - $img = Sesse::pr0n::QscaleProxy->new; + if ($can_use_qscale) { + $img = Sesse::pr0n::QscaleProxy->new; + } else { + $img = Image::Magick->new; + } $img->Read($last_good_mmlocation); } else { $img = read_original_image($r, $filename, $id, $dbwidth, $dbheight, $can_use_qscale); @@ -461,7 +465,11 @@ sub make_mipmap { } if ($last && !defined($img)) { # OK, read in the smallest one - $img = Sesse::pr0n::QscaleProxy->new; + if ($can_use_qscale) { + $img = Sesse::pr0n::QscaleProxy->new; + } else { + $img = Image::Magick->new; + } my $err = $img->Read($mmlocation); } } @@ -479,7 +487,7 @@ sub read_original_image { # Read in the original image my $magick; - if ($can_use_qscale && $filename =~ /\.jpeg$/i || $filename =~ /\.jpg$/i) { + if ($can_use_qscale && ($filename =~ /\.jpeg$/i || $filename =~ /\.jpg$/i)) { $magick = Sesse::pr0n::QscaleProxy->new; } else { $magick = Image::Magick->new;