--- loncom/auth/lonauth.pm 2001/07/25 01:44:53 1.20 +++ loncom/auth/lonauth.pm 2001/07/28 15:57:48 1.21 @@ -6,6 +6,7 @@ # 7/1,7/10,10/2,10/5,10/9,10/26,10/30,11/10, # 05/28,05/29 Gerd Kortemeyer # 07/24 Scott Harrison +# 07/28 Gerd Kortemeyer package Apache::lonauth; @@ -121,10 +122,10 @@ sub success { # ------------------------------------------------- Check for critical messages - my @what=&Apache::lonnet::dump('critical'); + my @what=&Apache::lonnet::dump('critical',$domain,$username); if ($what[0]) { if ($what[0] ne 'con_lost') { - $lowerurl='/adm/email/critical/'.$what[0]; + $lowerurl='/adm/email?critical=display'; } }