Help index only in other helps

diff --git a/PciIds/Html/Help.pm b/PciIds/Html/Help.pm
index b16e5622fd9c3bdbe0a2bc2699453d6398649792..5d0833425f853ae01c880f3cbea06f5d0c111418 100644 (file)
--- a/PciIds/Html/Help.pm
+++ b/PciIds/Html/Help.pm
@@ -37,7 +37,7 @@ sub getHelp( $$ ) {
        genHtmlHead( $req, $head, undef );
        my $addr = PciIds::Address::new( $req->uri() );
        print "<div class='top'>\n";
-       genMenu( $req, $addr, $args, $auth, [ [ 'Help index', 'help', 'index' ] ] );
+       genMenu( $req, $addr, $args, $auth, [ ( $helpname eq 'index' ) ? () : [ 'Help index', 'help', 'index' ] ] );
        print "<h1>$head</h1>\n";
        print "<div class='clear'></div></div>\n";
        genPath( $req, $addr, 1 );