X-Git-Url: https://git.sesse.net/?p=pr0n;a=blobdiff_plain;f=perl%2FSesse%2Fpr0n%2FIndex.pm;h=1be7b9e63e2a1ccf436519561005f5281432c2eb;hp=7d2ddf8227703ae74a51a066557c06b81f5bf55e;hb=3302d279442feb859579d6be6b8feb9adee34418;hpb=6c8c4bf3f1e3109523f9ec6117abfdf0e04a0d99

diff --git a/perl/Sesse/pr0n/Index.pm b/perl/Sesse/pr0n/Index.pm
index 7d2ddf8..1be7b9e 100644
--- a/perl/Sesse/pr0n/Index.pm
+++ b/perl/Sesse/pr0n/Index.pm
@@ -58,7 +58,7 @@ sub handler {
 	
 	my $where;
 	if ($event eq '+all') {
-		$where = '';
+		$where = ' AND (event,vhost) IN ( SELECT event,vhost FROM events WHERE NOT hidden )';
 	} else {
 		$where = ' AND event=' . $dbh->quote($event);
 	}
@@ -122,9 +122,8 @@ sub handler {
 		}
 	}
 	if (defined($author)) {
-		my $aq = $dbh->quote($author);
-
-		$where .= " AND takenby=$aq";
+		my @authors = split /,/, $author;
+		$where .= " AND takenby IN (" . join(', ', map { $dbh->quote($_) } @authors) . ")";
 	}
 
 	if (defined($num) && $num == -1) {