--- loncom/interface/lonchatfetch.pm 2006/03/29 21:16:18 1.22 +++ loncom/interface/lonchatfetch.pm 2006/05/09 14:38:09 1.23 @@ -1,7 +1,7 @@ # The LearningOnline Network # Chat Fetching # -# $Id: lonchatfetch.pm,v 1.22 2006/03/29 21:16:18 albertel Exp $ +# $Id: lonchatfetch.pm,v 1.23 2006/05/09 14:38:09 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -48,10 +48,8 @@ sub handler { $group) ) { return HTTP_NOT_ACCEPTABLE; } - my %curr_groups; - my $numgroups = &Apache::loncommon::coursegroups(\%curr_groups,$cdom, - $cnum,$group); - if ($numgroups) { + my %curr_groups = &Apache::loncommon::coursegroups($cdom,$cnum,$group); + if (%curr_groups) { my %group_info = &Apache::loncommon::get_group_settings($curr_groups{$group}); $grouptitle =