loncom/auth/lonacc.pm - diff

Return to lonacc.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.97, 2006/09/07 20:57:04	version 1.99, 2006/09/19 15:24:57
Line 180 sub sso_login {	Line 180 sub sso_login {
$r->internal_redirect('/adm/migrateuser');	$r->internal_redirect('/adm/migrateuser');
}	}
return OK;	return OK;
} elsif (defined($r->dir_config('lonSSOUserUnkownRedirect'))) {	} elsif (defined($r->dir_config('lonSSOUserUnknownRedirect'))) {
$r->internal_redirect($r->dir_config('lonSSOUserUnkownRedirect'));	$r->internal_redirect($r->dir_config('lonSSOUserUnknownRedirect'));
return OK;	return OK;
}	}
return undef;	return undef;
Line 201 sub handler {	Line 201 sub handler {
$handle=~s/\W//g;	$handle=~s/\W//g;
}	}

if (my $result = &sso_login($r,$lonid,$handle)) {	my $result = &sso_login($r,$lonid,$handle);
	if (defined($result) {
return $result	return $result
}	}