--- loncom/interface/loncoursedata.pm 2013/03/01 04:58:08 1.194 +++ loncom/interface/loncoursedata.pm 2015/03/10 02:45:56 1.196 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: loncoursedata.pm,v 1.194 2013/03/01 04:58:08 raeburn Exp $ +# $Id: loncoursedata.pm,v 1.196 2015/03/10 02:45:56 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1251,6 +1251,7 @@ sub ensure_current_data { } my $student_id = &get_student_id($sname,$sdom); + &get_students_groupids($student_id); my @Result = &Apache::lonmysql::get_rows($student_table, "student_id ='$student_id'"); my $data = undef; @@ -1277,6 +1278,7 @@ sub ensure_current_full_data { ($sdom,$sname,$courseid.'.db',$getuserdir); # my $student_id = &get_student_id($sname,$sdom); + &get_students_groupids($student_id); my @Result = &Apache::lonmysql::get_rows($student_table, "student_id ='$student_id'"); my $updatetime; @@ -2298,6 +2300,8 @@ sub CL_ROLE { return 13; } sub CL_EXTENT { return 14; } sub CL_PHOTO { return 15; } sub CL_THUMBNAIL { return 16; } +sub CL_AUTHORQUOTA { return 17; } +sub CL_AUTHORUSAGE { return 18; } sub get_classlist { my ($cdom,$cnum) = @_;