version 1.23, 2007/08/10 23:20:09
|
version 1.24, 2007/09/02 01:30:34
|
Line 208 ENDSCRIPT
|
Line 208 ENDSCRIPT
|
/^($LONCAPA::username_re):($LONCAPA::domain_re):(\w+)$/); |
/^($LONCAPA::username_re):($LONCAPA::domain_re):(\w+)$/); |
my ($uname,$udom,$urole)=($1,$2,$3); |
my ($uname,$udom,$urole)=($1,$2,$3); |
my $fullname=&Apache::loncommon::plainname($uname,$udom); |
my $fullname=&Apache::loncommon::plainname($uname,$udom); |
next if (($uname!~/^$filter/i) && ($fullname=~/^$filter/i)); |
next if (($uname!~/^$filter/i) && ($fullname !~/^$filter/i)); |
|
|
if (!exists($users{"$uname:$udom"})) { |
if (!exists($users{"$uname:$udom"})) { |
$users{"$uname:$udom"} = {'fullname' => $fullname }; |
$users{"$uname:$udom"} = {'fullname' => $fullname }; |