bug fixes

This commit is contained in:
JT Smith 2005-03-07 19:38:17 +00:00
parent d7d6819204
commit 88c42da7a0
14 changed files with 59 additions and 23 deletions

View file

@ -46,7 +46,7 @@ sub _seeAlso {
#-------------------------------------------------------------------
sub www_viewHelp {
return WebGUI::Privilege::insufficient() unless (WebGUI::Grouping::isInGroup(12));
return WebGUI::Privilege::insufficient() unless (WebGUI::Grouping::isInGroup(7));
my $ac = WebGUI::AdminConsole->new("help");
my $namespace = $session{form}{namespace} || "WebGUI";
my $help = _get($session{form}{hid},$namespace);
@ -63,7 +63,7 @@ sub www_viewHelp {
#-------------------------------------------------------------------
sub www_viewHelpIndex {
return WebGUI::Privilege::insufficient() unless (WebGUI::Grouping::isInGroup(12));
return WebGUI::Privilege::insufficient() unless (WebGUI::Grouping::isInGroup(7));
my %helpIndex;
tie %helpIndex, "Tie::IxHash";
my $i;