version 1.152, 2014/01/24 04:38:14
|
version 1.153, 2014/01/30 12:15:12
|
Line 402 sub sso_login {
|
Line 402 sub sso_login {
|
} |
} |
} |
} |
if (grep(/^sso$/,@cancreate)) { |
if (grep(/^sso$/,@cancreate)) { |
$r->internal_redirect('/adm/createaccount'); |
$r->set_handlers('PerlHandler'=> |
|
[\&Apache::createaccount::handler]); |
|
$r->handler('perl-script'); |
} else { |
} else { |
$r->internal_redirect($r->dir_config('lonSSOUserUnknownRedirect')); |
$r->internal_redirect($r->dir_config('lonSSOUserUnknownRedirect')); |
|
$r->set_handlers('PerlHandler'=> undef); |
} |
} |
$r->set_handlers('PerlHandler'=> undef); |
|
return OK; |
return OK; |
} |
} |
return undef; |
return undef; |