X-Git-Url: https://git.sesse.net/?a=blobdiff_plain;f=perl%2FSesse%2Fpr0n%2Fpr0n.pm;h=b65ccf096c1797fb5c95a5b1f5b65d2ec0b9c303;hb=9d97b1243a78e8703fefb2a1da2794a6434912c4;hp=55e64de907e983be97ef2e4edb49e3be5cd07053;hpb=437c5df6373cbf14cdaaa927655abe06f78b6d27;p=pr0n diff --git a/perl/Sesse/pr0n/pr0n.pm b/perl/Sesse/pr0n/pr0n.pm index 55e64de..b65ccf0 100644 --- a/perl/Sesse/pr0n/pr0n.pm +++ b/perl/Sesse/pr0n/pr0n.pm @@ -17,7 +17,7 @@ sub handler { my $r = shift; my $uri = $r->uri; - if ($uri eq '/') { + if ($uri eq '/' || $uri =~ /^\/\+tags\/?$/) { return Sesse::pr0n::Listing::handler($r); } elsif ($uri eq '/robots.txt' || $uri eq '/pr0n.css' || @@ -67,9 +67,11 @@ sub handler { return Sesse::pr0n::Registry::handler($r); } elsif ($uri =~ m#^/wizard$#) { return Sesse::pr0n::Wizard::handler($r); - } elsif ($uri =~ m#^/[a-zA-Z0-9-]+/?$#) { + } elsif ($uri =~ /^\/[a-zA-Z0-9-]+\/?$/ || + $uri =~ /^\/\+all\/?$/ || + $uri =~ /^\/\+tags\/[a-zA-Z0-9-]+\/?$/) { return Sesse::pr0n::Index::handler($r); - } elsif ($uri =~ m#^/[a-zA-Z0-9-]+/(\d+x\d+/|original/)?(nobox/)?[a-zA-Z0-9._-]+$#) { + } elsif ($uri =~ m#^/[a-zA-Z0-9-]+/(\d+x\d+/|original/)?(nobox/)?[a-zA-Z0-9._()-]+$#) { return Sesse::pr0n::Image::handler($r); }