![[BACK]](/icons/back.gif){kind=icon}
Return to switchserver.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / auth|
Return to switchserver.pm CVS log | Up to [LON-CAPA] / loncom / auth |
| version 1.18, 2007/11/14 02:54:11 | version 1.19, 2007/11/14 02:55:07 |
|---|---|
| Line 92 sub handler { | Line 92 sub handler { |
| if ($env{'user.name'} eq 'public' | if ($env{'user.name'} eq 'public' |
| && $env{'user.domain'} eq 'public') { | && $env{'user.domain'} eq 'public') { |
| my $url = 'http://'.$switch_to.'/'.$r->uri; | my $url = 'http://'.$switch_to.$r->uri; |
| return &do_redirect($r,$url,1) | return &do_redirect($r,$url,1) |
| } | } |