Help index

[pciids.git] / PciIds / Html / Handler.pm

diff --git a/PciIds/Html/Handler.pm b/PciIds/Html/Handler.pm
index da7c10f6d583613d9daeead1c7981dd9aa99f0b1..879086a26c4632175eb5127fc8eab119edbff926 100644 (file)
--- a/PciIds/Html/Handler.pm
+++ b/PciIds/Html/Handler.pm
@@ -23,7 +23,7 @@ my %handlers = (
                '' => \&PciIds::Html::List::list,
                #Database changes
                'newitem' => \&PciIds::Html::Changes::newItemForm,
-               'newcomment' => \&PciIds::Html::Changes::newCommentForm,
+               'newhistory' => \&PciIds::Html::Changes::newHistoryForm,
                #Registering users
                'register' => \&PciIds::Html::Users::registerForm,
                'register-confirm' => \&PciIds::Html::Users::confirmForm,
@@ -39,11 +39,12 @@ my %handlers = (
                #Some debug
                'test' => \&PciIds::Html::Debug::test,
                #Notifications
-               'notifications' => \&PciIds::Html::Notifications::notifForm
+               'notifications' => \&PciIds::Html::Notifications::notifForm,
+               'help' => \&PciIds::Html::Help::getHelp
        },
        'POST' => {
                'newitem' => \&PciIds::Html::Changes::newItemSubmit,
-               'newcomment' => \&PciIds::Html::Changes::newCommentSubmit,
+               'newhistory' => \&PciIds::Html::Changes::newHistorySubmit,
                'register' => \&PciIds::Html::Users::registerSubmit,
                'register-confirm' => \&PciIds::Html::Users::confirmSubmit,
                'login' => \&PciIds::Html::Users::loginSubmit,
@@ -57,10 +58,9 @@ my %handlers = (
 
 sub handler( $$ ) {
        my( $req, $hasSSL ) = @_;
-       return HTTPRedirect( $req, $req->uri()."index.html" ) if( $req->uri() eq '/' );
-       return DECLINED if( $req->uri() =~ /^\/((static)\/|robots.txt|index.html)/ );
-       return getHelp( $req ) if( $req->uri() =~ /^\/help/ );
        my $args = parseArgs( $req->args() );
+       return HTTPRedirect( $req, $req->uri()."index.html" ) if( $req->uri() eq '/' && ( !defined $args->{'action'} || $args->{'action'} ne 'help' ) );
+       return DECLINED if( $req->uri() =~ /^\/((static)\/|robots.txt|index.html)/ );
        my $action = $args->{'action'};
        $action = '' unless( defined $action );
        my $method = $handlers{$req->method()};