From dcf0d62b1abb7777c90516a6e8dbbcca9dc1649d Mon Sep 17 00:00:00 2001 From: Michal Vaner Date: Sat, 30 Aug 2008 12:28:35 +0200 Subject: [PATCH] Menu in notifications --- PciIds/Html/Notifications.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/PciIds/Html/Notifications.pm b/PciIds/Html/Notifications.pm index 042f064..1d5523a 100644 --- a/PciIds/Html/Notifications.pm +++ b/PciIds/Html/Notifications.pm @@ -12,6 +12,7 @@ sub genNotifForm( $$$$$$ ) { my $addr = PciIds::Address::new( $req->uri() ); genHtmlHead( $req, $addr->pretty().' - notifications', undef ); print "

".$addr->pretty()." - notifications

\n"; + genLocMenu( $req, $args, [ logItem( $auth ), $addr->canAddItem() ? [ 'New item', 'newitem' ] : (), $addr->canDiscuss ? [ 'Discuss', 'newhistory' ] : (), [ 'Profile', 'profile' ] ] ); print "
$error
\n" if( defined $error ); my $uri = $addr->get(); my $notifs = $tables->notificationsUser( $auth->{'authid'} ); @@ -28,6 +29,7 @@ sub genNotifForm( $$$$$$ ) { } print "\n" if( $started ); print "
\n"; + print "

Effect range

\n"; print "

{'recursive'} ? " checked='checked'" : "" )."> Recursive\n"; print "

Notification level

\n"; print "

\n"; @@ -45,7 +47,6 @@ sub genNotifForm( $$$$$$ ) { } print "\n"; } - print "Back to browsing\n"; genHtmlTail(); return OK; } -- 2.39.2