mod_perl warnings fixes

This commit is contained in:
JT Smith 2003-05-26 04:41:24 +00:00
parent 938ccbb565
commit 53f0b7c0f3
5 changed files with 34 additions and 23 deletions

View file

@ -278,7 +278,7 @@ sub isInGroup {
}
}
### Check for groups of groups.
my $groups = WebGUI::Grouping::getGroupsInGroup($gid,1);
$groups = WebGUI::Grouping::getGroupsInGroup($gid,1);
foreach (@{$groups}) {
$session{isInGroup}{$_} = isInGroup($_, $uid);
if ($session{isInGroup}{$_}) {