--- loncom/interface/lonmsg.pm 2010/11/10 14:44:50 1.230 +++ loncom/interface/lonmsg.pm 2011/02/13 17:44:51 1.231 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Routines for messaging # -# $Id: lonmsg.pm,v 1.230 2010/11/10 14:44:50 bisitz Exp $ +# $Id: lonmsg.pm,v 1.231 2011/02/13 17:44:51 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -578,7 +578,7 @@ sub make_htmlfree { sub mynewmail{ &newmail(); - return $env{'user.mailcheck.lastnewmassagetime'} > $env{'user.mailcheck.lastvisit'}; + return $env{'user.mailcheck.lastnewmessagetime'} > $env{'user.mailcheck.lastvisit'}; } @@ -586,7 +586,7 @@ sub newmail { if ((time-$env{'user.mailcheck.time'})>300) { my %what=&Apache::lonnet::get('email_status',['recnewemail']); &Apache::lonnet::appenv({'user.mailcheck.time'=>time}); - &Apache::lonnet::appenv({'user.mailcheck.lastnewmassagetime'=> $what{'recnewemail'}}); + &Apache::lonnet::appenv({'user.mailcheck.lastnewmessagetime'=> $what{'recnewemail'}}); if ($what{'recnewemail'}>0) { return 1; } } return 0;