--- loncom/interface/lonchatfetch.pm 2006/05/09 14:38:09 1.23 +++ loncom/interface/lonchatfetch.pm 2006/05/18 01:08:50 1.24 @@ -1,7 +1,7 @@ # The LearningOnline Network # Chat Fetching # -# $Id: lonchatfetch.pm,v 1.23 2006/05/09 14:38:09 albertel Exp $ +# $Id: lonchatfetch.pm,v 1.24 2006/05/18 01:08:50 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -33,6 +33,7 @@ use Apache::Constants qw(:common :http); use Apache::lontexconvert; use Apache::loncommon; use Apache::lonnet; +use Apache::longroup; sub handler { my $r = shift; @@ -48,10 +49,10 @@ sub handler { $group) ) { return HTTP_NOT_ACCEPTABLE; } - my %curr_groups = &Apache::loncommon::coursegroups($cdom,$cnum,$group); + my %curr_groups = &Apache::longroup::coursegroups($cdom,$cnum,$group); if (%curr_groups) { my %group_info = - &Apache::loncommon::get_group_settings($curr_groups{$group}); + &Apache::longroup::get_group_settings($curr_groups{$group}); $grouptitle = ''.&Apache::lonnet::unescape($group_info{description}). '
';