loncom/enrollment/Autoupdate.pl - diff

Return to Autoupdate.pl CVS log

Up to [LON-CAPA] / loncom / enrollment

version 1.17, 2010/03/25 04:21:32	version 1.18, 2010/03/25 04:36:02
Line 73	Line 73
my @cdoms = ($dom);	my @cdoms = ($dom);
my $dir = $Apache::lonnet::perlvar{lonUsersDir}.'/'.$dom;	my $dir = $Apache::lonnet::perlvar{lonUsersDir}.'/'.$dom;
&descend_tree($dir,0,\%users);	&descend_tree($dir,0,\%users);
foreach my $uname (keys(%users)) {	foreach my $uname (sort(keys(%users))) {
next if ($courses{$dom.'_'.$uname});	next if ($courses{$dom.'_'.$uname});
my %userhash = &Apache::lonnet::userenvironment($dom,$uname,@info);	my %userhash = &Apache::lonnet::userenvironment($dom,$uname,@info);
my (@inststatuses);	my (@inststatuses);