![[BACK]](/icons/back.gif){kind=icon}
Return to lonroles.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / auth|
Return to lonroles.pm CVS log | Up to [LON-CAPA] / loncom / auth |
| version 1.261, 2011/09/09 16:34:41 | version 1.262, 2011/10/21 16:28:49 |
|---|---|
| Line 601 ENDENTERKEY | Line 601 ENDENTERKEY |
| if ($role =~ /^(au|ca|aa)$/) { | if ($role =~ /^(au|ca|aa)$/) { |
| my $redirect_url = '/priv/'; | my $redirect_url = '/priv/'; |
| if ($role eq 'au') { | if ($role eq 'au') { |
| $redirect_url.=$env{'user.name'}; | $redirect_url.=$env{'user.domain'}.'/'.$env{'user.name'}; |
| } else { | } else { |
| $where =~ /\/(.*)$/; | $where =~ /\/(.*)$/; |
| $redirect_url .= $1; | $redirect_url .= $1; |