X-Git-Url: https://git.sesse.net/?p=pr0n;a=blobdiff_plain;f=perl%2FSesse%2Fpr0n%2FIndex.pm;h=00709aa352a24fbce73821966816a9acf97fe46c;hp=bf201acab472241574e7d3427bcb5b530a16a44d;hb=5862afca102bc7ed2993602ae78b3a0331869ff4;hpb=6e87d26481ba152a8504c3c6c8650d1927206331 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) {