|
version 1.21, 2007/11/15 01:17:16
|
version 1.23, 2010/03/10 21:25:29
|
|
Line 73 sub handler {
|
Line 73 sub handler {
|
| if (!defined($handle)) { return FORBIDDEN; } |
if (!defined($handle)) { return FORBIDDEN; } |
| |
|
| &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'}, |
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'}, |
| ['otherserver','role']); |
['otherserver','role','origurl','symb']); |
| |
|
| my $switch_to=&Apache::lonnet::hostname($env{'form.otherserver'}); |
my $switch_to=&Apache::lonnet::hostname($env{'form.otherserver'}); |
| if (! $env{'form.otherserver'}) { |
if (! $env{'form.otherserver'}) { |
|
Line 123 sub handler {
|
Line 123 sub handler {
|
| # -------------------------------------------------------- Menu script and info |
# -------------------------------------------------------- Menu script and info |
| |
|
| my $windowinfo= |
my $windowinfo= |
| &Apache::lonmenu::close(). |
|
| &Apache::lonnavmaps::close(); |
&Apache::lonnavmaps::close(); |
| # ---------------------------------------------------------------- Get handover |
# ---------------------------------------------------------------- Get handover |
| |
|
|
Line 132 sub handler {
|
Line 131 sub handler {
|
| 'username' => $env{'user.name'}, |
'username' => $env{'user.name'}, |
| 'role' => $env{'form.role'}, |
'role' => $env{'form.role'}, |
| 'server' => $r->dir_config('lonHostID')); |
'server' => $r->dir_config('lonHostID')); |
| |
if ($env{'form.origurl'}) { |
| |
$info{'origurl'} = $env{'form.origurl'}; |
| |
} |
| |
if ($env{'form.symb'}) { |
| |
$info{'symb'} = $env{'form.symb'}; |
| |
} |
| if ($env{'request.sso.login'}) { |
if ($env{'request.sso.login'}) { |
| $info{'sso.login'} = $env{'request.sso.login'}; |
$info{'sso.login'} = $env{'request.sso.login'}; |
| } |
} |
![[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