version 1.40, 2002/10/11 20:04:34
|
version 1.41, 2002/10/11 20:09:36
|
Line 125 sub newmail {
|
Line 125 sub newmail {
|
if ((time-$ENV{'user.mailcheck.time'})>300) { |
if ((time-$ENV{'user.mailcheck.time'})>300) { |
my %what=&Apache::lonnet::get('email_status',['recnewemail']); |
my %what=&Apache::lonnet::get('email_status',['recnewemail']); |
&Apache::lonnet::appenv('user.mailcheck.time'=>time); |
&Apache::lonnet::appenv('user.mailcheck.time'=>time); |
&Apache::lonnet::logthis('Check Mail: '.$what{'recnewemail'}); |
|
if ($what{'recnewemail'}>0) { return 1; } |
if ($what{'recnewemail'}>0) { return 1; } |
} |
} |
return 0; |
return 0; |