fixed the context sensitive help links

This commit is contained in:
JT Smith 2004-07-05 21:51:39 +00:00
parent 3375889a61
commit fbd0fa7efa
33 changed files with 77 additions and 107 deletions

View file

@ -116,7 +116,7 @@ sub www_editNavigation {
$config->{showUnprivilegedPages} = 0;
$config->{'reverse'} = 0;
}
my $output = helpIcon(83).'<h1>'.WebGUI::International::get(22, 'Navigation').'</h1>';
my $output = helpIcon("navigation add/edit").'<h1>'.WebGUI::International::get(22, 'Navigation').'</h1>';
tie my (%tabs) , 'Tie::IxHash';
%tabs = (
properties=>{
@ -276,7 +276,7 @@ sub www_editNavigationSave {
#-------------------------------------------------------------------
sub www_listNavigation {
return WebGUI::Privilege::insufficient() unless (WebGUI::Grouping::isInGroup(3));
my $output .= helpIcon(84).'<h1>'.WebGUI::International::get(34,'Navigation').'</h1>';
my $output .= helpIcon("navigation manage").'<h1>'.WebGUI::International::get(34,'Navigation').'</h1>';
my $sth = WebGUI::SQL->read("select navigationId, identifier from Navigation order by identifier");
my $i = 0;
my @row = ();