--- loncom/interface/loncoursedata.pm	2006/05/11 20:05:03	1.170
+++ loncom/interface/loncoursedata.pm	2006/05/18 01:08:51	1.171
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: loncoursedata.pm,v 1.170 2006/05/11 20:05:03 raeburn Exp $
+# $Id: loncoursedata.pm,v 1.171 2006/05/18 01:08:51 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -51,6 +51,7 @@ package Apache::loncoursedata;
 use strict;
 use Apache::lonnet;
 use Apache::lonhtmlcommon;
+use Apache::longroup;
 use Time::HiRes;
 use Apache::lonmysql;
 use HTML::TokeParser;
@@ -965,7 +966,7 @@ sub populate_groupnames_table {
     my $dbh = &Apache::lonmysql::get_dbh();
     my $cdom = $env{'course.'.$courseid.'.domain'};
     my $cnum = $env{'course.'.$courseid.'.num'};
-    my %curr_groups = &Apache::loncommon::coursegroups($cdom,$cnum);
+    my %curr_groups = &Apache::longroup::coursegroups($cdom,$cnum);
     return if (!%curr_groups);
     my $request = 'INSERT IGNORE INTO '.$groupnames_table.
                   '(groupname) VALUES ';
@@ -3152,7 +3153,7 @@ sub get_group_memberships {
     my (%classgroups,%studentgroups);
     my $now = time;
     my $access_end = $env{'course.'.$cid.'.default_enrollment_end_date'};
-    my %curr_groups =&Apache::loncommon::coursegroups($cdom,$cnum);
+    my %curr_groups =&Apache::longroup::coursegroups($cdom,$cnum);
     if (%curr_groups) {
         my $grpindex = scalar(@{$keylist});
         my %groupmemberhash =