--- loncom/enrollment/Autoupdate.pl 2010/03/25 04:21:32 1.17 +++ loncom/enrollment/Autoupdate.pl 2010/03/25 04:36:02 1.18 @@ -1,7 +1,7 @@ #!/usr/bin/perl # # Automated Userinfo update script -# $Id: Autoupdate.pl,v 1.17 2010/03/25 04:21:32 raeburn Exp $ +# $Id: Autoupdate.pl,v 1.18 2010/03/25 04:36:02 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -73,7 +73,7 @@ my @cdoms = ($dom); my $dir = $Apache::lonnet::perlvar{lonUsersDir}.'/'.$dom; &descend_tree($dir,0,\%users); - foreach my $uname (keys(%users)) { + foreach my $uname (sort(keys(%users))) { next if ($courses{$dom.'_'.$uname}); my %userhash = &Apache::lonnet::userenvironment($dom,$uname,@info); my (@inststatuses);