From 5dd015133565a6b7abc07828bf4c95769846a438 Mon Sep 17 00:00:00 2001
From: "Steinar H. Gunderson" <sesse@debian.org>
Date: Sun, 13 Jul 2008 00:30:48 +0200
Subject: [PATCH] Support Mitchell filtering via qscale.

---
 perl/Sesse/pr0n/QscaleProxy.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/perl/Sesse/pr0n/QscaleProxy.pm b/perl/Sesse/pr0n/QscaleProxy.pm
index f534d78..3f0052c 100644
--- a/perl/Sesse/pr0n/QscaleProxy.pm
+++ b/perl/Sesse/pr0n/QscaleProxy.pm
@@ -129,9 +129,10 @@ sub Resize {
 	my $samp_v2 = 1;
 
 	my $filter;
-	if ($args{'filter'} eq 'Lanczos' ||
-	    $args{'filter'} eq 'Mitchell') {
+	if ($args{'filter'} eq 'Lanczos') {
 		$filter = $qscale::LANCZOS;
+	} elsif ($args{'filter'} eq 'Mitchell') {
+		$filter = $qscale::MITCHELL;
 	} else {
 		die "Unknown filter " . $args{'filter'};
 	}
-- 
2.39.2