loncom/misc/refresh_courseids_db.pl - diff

Return to refresh_courseids_db.pl CVS log

Up to [LON-CAPA] / loncom / misc

version 1.13, 2012/07/21 21:20:25	version 1.14, 2013/05/10 15:57:36
Line 85 my @ids=&Apache::lonnet::current_machine	Line 85 my @ids=&Apache::lonnet::current_machine
$env{'allowed.bre'} = 'F';	$env{'allowed.bre'} = 'F';

foreach my $dom (@domains) {	foreach my $dom (@domains) {
	$env{'user.domain'} = $dom;
	$env{'user.name'} = &Apache::lonnet::get_domainconfiguser($dom);
my %courseshash;	my %courseshash;
my %currhash = &Apache::lonnet::courseiddump($dom,'.',1,'.','.','.',1,\@ids,'.');	my %currhash = &Apache::lonnet::courseiddump($dom,'.',1,'.','.','.',1,\@ids,'.');
my %lastaccess = &Apache::lonnet::courselastaccess($dom,undef,\@ids);	my %lastaccess = &Apache::lonnet::courselastaccess($dom,undef,\@ids);
Line 101 foreach my $dom (@domains) {	Line 103 foreach my $dom (@domains) {
}	}
}	}
}	}
	delete($env{'user.name'};
	delete($env{'user.domain'});
}	}

delete($env{'allowed.bre'});	delete($env{'allowed.bre'});