version 1.115, 2008/05/14 18:27:30
|
version 1.116, 2008/09/15 19:08:44
|
Line 187 sub sso_login {
|
Line 187 sub sso_login {
|
'server' => $r->dir_config('lonHostID'), |
'server' => $r->dir_config('lonHostID'), |
'sso.login' => 1 |
'sso.login' => 1 |
); |
); |
|
if ($r->dir_config("ssodirecturl") == 1) { |
|
$info{'origurl'} = $r->uri; |
|
} |
if (defined($r->dir_config("lonSSOReloginServer"))) { |
if (defined($r->dir_config("lonSSOReloginServer"))) { |
$info{'sso.reloginserver'} = |
$info{'sso.reloginserver'} = |
$r->dir_config('lonSSOReloginServer'); |
$r->dir_config('lonSSOReloginServer'); |
Line 239 sub handler {
|
Line 242 sub handler {
|
|
|
my $result = &sso_login($r,$handle); |
my $result = &sso_login($r,$handle); |
if (defined($result)) { |
if (defined($result)) { |
return $result |
return $result; |
} |
} |
|
|
|
|