X-Git-Url: https://git.sesse.net/?p=pr0n;a=blobdiff_plain;f=perl%2FSesse%2Fpr0n%2FIndex.pm;h=b8825bdb748fd0e6ddd01902737d52546d4e89a5;hp=ee4c0f967a838c8ef2ea4ed9f84b9dfcaf45a09d;hb=927b8258de3030178d59304b9b45648930482d49;hpb=fa10473159be03eb924e50cdb4688540c78f89b1

diff --git a/perl/Sesse/pr0n/Index.pm b/perl/Sesse/pr0n/Index.pm
index ee4c0f9..b8825bd 100644
--- a/perl/Sesse/pr0n/Index.pm
+++ b/perl/Sesse/pr0n/Index.pm
@@ -251,17 +251,28 @@ sub handler {
 				for my $e (@equipment) {
 					my $eqspec = $e->{'model'};
 					$eqspec .= ', ' . $e->{'lens'} if (defined($e->{'lens'}));
+					$eqspec = HTML::Entities::encode_entities($eqspec);
 
 					my %newsettings = %defsettings;
-					$newsettings{'model'} = $e->{'model'};
-					$newsettings{'lens'} = defined($e->{'lens'}) ? $e->{'lens'} : '';
+
+					my $action;
+					if (defined($model) && defined($lens)) {
+						chomp ($action = Sesse::pr0n::Templates::fetch_template($r, "unfilter"));
+						$newsettings{'model'} = undef;
+						$newsettings{'lens'} = undef;
+					} else {
+						chomp ($action = Sesse::pr0n::Templates::fetch_template($r, "filter"));
+						$newsettings{'model'} = $e->{'model'};
+						$newsettings{'lens'} = defined($e->{'lens'}) ? $e->{'lens'} : '';
+					}
+					
 					my $url = "/$event/" . Sesse::pr0n::Common::get_query_string(\%newsettings, \%defsettings);
 
 					# This isn't correct for all languages. Fix if we ever need to care. :-)
 					if ($e->{'num'} == 1) {
-						Sesse::pr0n::Templates::print_template($r, "equipment-item-singular", { eqspec => $eqspec, filterurl => $url });
+						Sesse::pr0n::Templates::print_template($r, "equipment-item-singular", { eqspec => $eqspec, filterurl => $url, action => $action });
 					} else {
-						Sesse::pr0n::Templates::print_template($r, "equipment-item", { eqspec => $eqspec, num => $e->{'num'}, filterurl => $url });
+						Sesse::pr0n::Templates::print_template($r, "equipment-item", { eqspec => $eqspec, num => $e->{'num'}, filterurl => $url, action => $action });
 					}
 				}
 				Sesse::pr0n::Templates::print_template($r, "equipment-end");