loncom/auth/lonacc.pm - diff

Return to lonacc.pm CVS log

Up to [LON-CAPA] / loncom / auth

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;