Add the equipment list back into +all for now.

[pr0n] / perl / Sesse / pr0n / Index.pm

diff --git a/perl/Sesse/pr0n/Index.pm b/perl/Sesse/pr0n/Index.pm
index 39a8b21ba50d251aff274d3ad76215c2b432a74f..8409c8486d197d78b31fbc79780057ad10a7ca2f 100644 (file)
--- a/perl/Sesse/pr0n/Index.pm
+++ b/perl/Sesse/pr0n/Index.pm
@@ -184,7 +184,7 @@ sub handler {
                print_fullscreen($r, $event, \%settings, \%defsettings);
                print_nextprev($r, $event, $where, \%settings, \%defsettings);
        
-               if ($event ne '+all') {
+               if (1 || $event ne '+all') {
                        # Find the equipment used
                        my $eq = $dbh->prepare("
                                SELECT