version 1.466, 2006/10/31 22:05:53
|
version 1.467, 2006/11/01 22:22:31
|
Line 2072 sub getemails {
|
Line 2072 sub getemails {
|
if ($udom eq 'public' && $uname eq 'public') { |
if ($udom eq 'public' && $uname eq 'public') { |
return; |
return; |
} |
} |
|
if (!$udom) { $udom=$env{'user.domain'}; } |
|
if (!$uname) { $uname=$env{'user.name'}; } |
my $id=$uname.':'.$udom; |
my $id=$uname.':'.$udom; |
my ($names,$cached)=&Apache::lonnet::is_cached_new('emailscache',$id); |
my ($names,$cached)=&Apache::lonnet::is_cached_new('emailscache',$id); |
if ($cached) { |
if ($cached) { |