diff --git a/lib/WebGUI/Grouping.pm b/lib/WebGUI/Grouping.pm index 5463ab2eb..a11692486 100755 --- a/lib/WebGUI/Grouping.pm +++ b/lib/WebGUI/Grouping.pm @@ -254,6 +254,7 @@ A boolean value to determine whether the method should return the groups directl =cut sub getGroupsInGroup { + return undef unless $_[0]; my $groups = WebGUI::SQL->buildArrayRef("select groupId from groupGroupings where inGroup=$_[0]"); if ($_[1]) { my @groupsOfGroups = @$groups;