X-Git-Url: https://git.sesse.net/?p=pr0n;a=blobdiff_plain;f=perl%2FSesse%2Fpr0n%2Fpr0n.pm;h=ff4ae8e4be52b3472fd34c8f717ab3ff1e8211a9;hp=54e55be8270f43ca12c42f89b262e3d59b91c053;hb=fb1421cd30d9e888d738012b826761cc418082da;hpb=d5489e1aa91408c7b89766adfe269849d587cf9a diff --git a/perl/Sesse/pr0n/pr0n.pm b/perl/Sesse/pr0n/pr0n.pm index 54e55be..ff4ae8e 100644 --- a/perl/Sesse/pr0n/pr0n.pm +++ b/perl/Sesse/pr0n/pr0n.pm @@ -6,6 +6,7 @@ use Sesse::pr0n::Rotate; use Sesse::pr0n::Select; use Sesse::pr0n::WebDAV; use Sesse::pr0n::NewEvent; +use Sesse::pr0n::Upload; use IO::File::WithPath; package Sesse::pr0n::pr0n; @@ -21,7 +22,6 @@ sub handler { } elsif ($uri eq '/robots.txt' || $uri eq '/pr0n.css' || $uri eq '/skoyen.css' || - $uri eq '/blah.png' || $uri eq '/faq.html' || $uri eq '/pr0n-fullscreen.css' || $uri eq '/pr0n-fullscreen-ie.css' || @@ -29,9 +29,7 @@ sub handler { $uri eq '/previous.png' || $uri eq '/next.png' || $uri eq '/close.png' || - $uri eq '/wizard.js' || - $uri eq '/wizard.css' || - $uri eq '/pr0n.ico' || + $uri eq '/options.png' || $uri =~ m#^/usage/([a-zA-Z0-9_.]+)$#) { $uri =~ s#^/##; my $fname = $Sesse::pr0n::Config::image_base . 'files/' . $uri; @@ -66,6 +64,8 @@ sub handler { return Sesse::pr0n::Select::handler($r); } elsif ($uri =~ m#^/newevent$#) { return Sesse::pr0n::NewEvent::handler($r); + } elsif ($uri =~ /^\/upload\/[a-zA-Z0-9-]+\/?$/) { + return Sesse::pr0n::Upload::handler($r); } elsif ($uri =~ /^\/[a-zA-Z0-9-]+\/?$/ || $uri =~ /^\/\+all\/?$/) { return Sesse::pr0n::Index::handler($r);