]> mj.ucw.cz Git - pciids.git/blobdiff - PciIds/Html/Notifications.pm
Split menu to left and right part
[pciids.git] / PciIds / Html / Notifications.pm
index 1d5523a3c05d2dac32905d13d3d835d4f3a2e147..4e440b7ea208b76f104d70a62afb052cbdac579a 100644 (file)
@@ -11,8 +11,7 @@ sub genNotifForm( $$$$$$ ) {
        my( $req, $args, $tables, $auth, $error, $data ) = @_;
        my $addr = PciIds::Address::new( $req->uri() );
        genHtmlHead( $req, $addr->pretty().' - notifications', undef );
-       print "<h1>".$addr->pretty()." - notifications</h1>\n";
-       genLocMenu( $req, $args, [ logItem( $auth ), $addr->canAddItem() ? [ 'New item', 'newitem' ] : (), $addr->canDiscuss ? [ 'Discuss', 'newhistory' ] : (), [ 'Profile', 'profile' ] ] );
+       genCustomHead( $req, $args, $addr, $addr->pretty()." - notifications", [ $addr->canAddItem() ? [ 'New item', 'newitem' ] : (), $addr->canDiscuss ? [ 'Discuss', 'newhistory' ] : (), [ 'Help', 'help', 'notifications' ] ], [ logItem( $auth ), [ 'Profile', 'profile' ] ] );
        print "<div class='error'>$error</div>\n" if( defined $error );
        my $uri = $addr->get();
        my $notifs = $tables->notificationsUser( $auth->{'authid'} );
@@ -29,18 +28,18 @@ sub genNotifForm( $$$$$$ ) {
        }
        print "</ul></div>\n" if( $started );
        print "<form name='notifications' id='notifications' method='POST' action=''>\n";
-       print "<h3>Effect range</h3>\n";
+       print "<h2>Effect range</h2>\n";
        print "<p><input type='checkbox' value='recursive' name='recursive'".( $data->{'recursive'} ? " checked='checked'" : "" )."> Recursive\n";
-       print "<h3>Notification level</h3>\n";
+       print "<h2>Notification level</h2>\n";
        print "<p>\n";
-       genRadios( [ [ 'None', '3' ], [ 'Main comment &amp; new subitem', '2' ], [ 'Description', '1' ], [ 'Comment', '0' ] ], 'notification', ( defined $data->{'notification'} ) ? $data->{'notification'} : '3' );
-       print "<h3>Notification way</h3>\n";
+       genRadios( [ [ 'None', '3' ], [ 'Main comment &amp; new sub-item', '2' ], [ 'Suggestion', '1' ], [ 'Discussion', '0' ] ], 'notification', ( defined $data->{'notification'} ) ? $data->{'notification'} : '3' );
+       print "<h2>Notification way</h2>\n";
        print "<p>\n";
        genRadios( [ [ 'Email', '0' ], [ 'Xmpp', '1' ], [ 'Both', '2' ] ], 'way', ( defined $data->{'way'} ) ? $data->{'way'} : '0' );
        print "<p><input type='submit' value='Submit' name='submit'>\n";
        print "</form>\n";
        if( @{$notifs} ) {
-               print "<div class='navigation'><h3>All notifications</h3><ul>\n";
+               print "<div class='navigation'><h2>All notifications</h2><ul>\n";
                foreach( @{$notifs} ) {
                        my( $location ) = @{$_};
                        print "<li><a href='/$location".buildArgs( $args )."'>".PciIds::Address::new( $location )->pretty()."</a>\n";