loncom/interface/loncoursedata.pm - diff

Return to loncoursedata.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.28, 2002/09/01 06:23:19	version 1.30, 2002/09/03 12:27:05
Line 737 sub ProcessStudentData {	Line 737 sub ProcessStudentData {
my %courseKeys;	my %courseKeys;
# user name:domain was prepended earlier in DownloadCourseInformation	# user name:domain was prepended earlier in DownloadCourseInformation
foreach (keys %$courseData) {	foreach (keys %$courseData) {
my $currentKey =~ s/^$name//;	my $currentKey = $_;
	$currentKey =~ s/^$name//;
$courseKeys{$currentKey}++;	$courseKeys{$currentKey}++;
$cache->{$_}=$courseData->{$_};	$cache->{$_}=$courseData->{$_};
}	}
Line 1249 sub DownloadStudentCourseDataSeparate {	Line 1250 sub DownloadStudentCourseDataSeparate {
$WhatIWant .= '\|timestamp)';	$WhatIWant .= '\|timestamp)';
$WhatIWant .= ')';	$WhatIWant .= ')';

&CheckForResidualDownload($courseID, $cacheDB, $students, $c);	&CheckForResidualDownload($cacheDB, 'true', 'true', $courseID, $r, $c);

my $studentCount = scalar(@$students);	my $studentCount = scalar(@$students);
if($status eq 'true') {	if($status eq 'true') {