From 5862afca102bc7ed2993602ae78b3a0331869ff4 Mon Sep 17 00:00:00 2001
From: "Steinar H. Gunderson" <sesse@debian.org>
Date: Mon, 7 Aug 2006 01:28:58 +0200
Subject: [PATCH] Fix nobox + noscale.

---
 perl/Sesse/pr0n/Index.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/perl/Sesse/pr0n/Index.pm b/perl/Sesse/pr0n/Index.pm
index bf201ac..00709aa 100644
--- a/perl/Sesse/pr0n/Index.pm
+++ b/perl/Sesse/pr0n/Index.pm
@@ -169,7 +169,7 @@ sub handler {
 				}
 
 				my $filename = $ref->{'filename'};
-				my $uri = $filename;
+				my $uri = $infobox . $filename;
 				if (defined($xres) && defined($yres) && $xres != -1) {
 					$uri = "${xres}x$yres/$infobox$filename";
 				} elsif (defined($xres) && $xres == -1) {
@@ -212,7 +212,7 @@ sub handler {
 				}
 
 				my $filename = $ref->{'filename'};
-				my $uri = $filename;
+				my $uri = $infobox . $filename;
 				if (defined($xres) && defined($yres) && $xres != -1) {
 					$uri = "${xres}x$yres/$infobox$filename";
 				} elsif (defined($xres) && $xres == -1) {
@@ -250,7 +250,7 @@ sub handler {
 				}
 
 				my $filename = $ref->{'filename'};
-				my $uri = $filename;
+				my $uri = $infobox . $filename;
 				if (defined($xres) && defined($yres) && $xres != -1) {
 					$uri = "${xres}x$yres/$infobox$filename";
 				} elsif (defined($xres) && $xres == -1) {
-- 
2.39.2