loncom/interface/loncoursedata.pm - diff

Return to loncoursedata.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.186, 2008/01/07 03:00:00	version 1.187, 2008/04/17 14:51:43
Line 1669 sub ensure_current_data {	Line 1669 sub ensure_current_data {
#	#
# Get the update time for the user	# Get the update time for the user
my $updatetime = 0;	my $updatetime = 0;
	my $getuserdir = 1;
my $modifiedtime = &Apache::lonnet::GetFileTimestamp	my $modifiedtime = &Apache::lonnet::GetFileTimestamp
($sdom,$sname,$courseid.'.db',	($sdom,$sname,$courseid.'.db',$getuserdir);
$Apache::lonnet::perlvar{'lonUsersDir'});
#	#
if ($modifiedtime == -1) {	if ($modifiedtime == -1) {
return ('no data',undef);	return ('no data',undef);
Line 1721 sub ensure_current_full_data {	Line 1721 sub ensure_current_full_data {
&ensure_tables_are_set_up($courseid);	&ensure_tables_are_set_up($courseid);
#	#
# Get the update time for the user	# Get the update time for the user
	my $getuserdir = 1;
my $modifiedtime = &Apache::lonnet::GetFileTimestamp	my $modifiedtime = &Apache::lonnet::GetFileTimestamp
($sdom,$sname,$courseid.'.db',	($sdom,$sname,$courseid.'.db',$getuserdir);
$Apache::lonnet::perlvar{'lonUsersDir'});
#	#
my $student_id = &get_student_id($sname,$sdom);	my $student_id = &get_student_id($sname,$sdom);
my @Result = &Apache::lonmysql::get_rows($student_table,	my @Result = &Apache::lonmysql::get_rows($student_table,