X-Git-Url: https://git.sesse.net/?a=blobdiff_plain;f=perl%2FSesse%2Fpr0n%2FIndex.pm;h=de0e3bf2f640c1df5b0aafea98041ecad1da09e4;hb=38fd1954ea4ae45f54f8ab2bbe869fc953320021;hp=e85ab6e7ae0e281627da373a820994f630ddee18;hpb=675db3ce4a65a4e75374eb2db2092955ee6c65eb;p=pr0n diff --git a/perl/Sesse/pr0n/Index.pm b/perl/Sesse/pr0n/Index.pm index e85ab6e..de0e3bf 100644 --- a/perl/Sesse/pr0n/Index.pm +++ b/perl/Sesse/pr0n/Index.pm @@ -82,7 +82,7 @@ sub handler { $num = undef; } - my $ref = $dbh->selectrow_hashref('SELECT name,date,EXTRACT(EPOCH FROM last_update) AS last_update FROM events WHERE id=? AND vhost=?', + $ref = $dbh->selectrow_hashref('SELECT name,date,EXTRACT(EPOCH FROM last_update) AS last_update FROM events WHERE id=? AND vhost=?', undef, $event, $r->get_server_name) or error($r, "Could not find event $event", 404, "File not found");