--- loncom/interface/lonpopulate.pm 2006/08/10 21:46:40 1.47 +++ loncom/interface/lonpopulate.pm 2007/03/08 01:58:45 1.49 @@ -1,5 +1,5 @@ # automated enrollment configuration handler -# $Id: lonpopulate.pm,v 1.47 2006/08/10 21:46:40 albertel Exp $ +# $Id: lonpopulate.pm,v 1.49 2007/03/08 01:58:45 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -944,19 +944,13 @@ your changes. '); my ($result,$perm_reqd)=&Apache::lonnet::auto_photo_permission($crs,$dom); my $can_enable = 1; - my $institution = $Apache::lonnet::domaindescription{$dom}; - my $user; - if ($enrollvar{'courseowner'} =~ /^[^:]+:[^:]+$/) { - $user = $env{'user.name'}.':'.$env{'user.domain'}; - } else { - $user = $env{'user.name'}; - } + my $institution = &Apache::lonnet::domain($dom,'description'); if ($result eq 'ok') { if ($perm_reqd eq 'yes') { if (!($enrollvar{'photopermission'} eq 'yes')) { $can_enable = 0; } else { - if ($user eq $enrollvar{'courseowner'}) { + if (&user_is_courseowner($enrollvar{'courseowner'})) { $r->print('