loncom/auth/lonacc.pm - diff

Return to lonacc.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.150, 2013/12/19 22:50:16	version 1.152, 2014/01/24 04:38:14
Line 364 sub sso_login {	Line 364 sub sso_login {
$info{$item} = $form{$item};	$info{$item} = $form{$item};
}	}
}	}
	unless ($info{'symb'}) {
	unless (($r->uri eq '/adm/roles') \|\| ($r->uri eq '/adm/sso')) {
	$info{'origurl'} = $r->uri;
	}
	}
if ($r->dir_config("ssodirecturl") == 1) {	if ($r->dir_config("ssodirecturl") == 1) {
$info{'origurl'} = $r->uri;	$info{'origurl'} = $r->uri;
}	}
Line 525 sub handler {	Line 530 sub handler {
if ($otherserver ne '') {	if ($otherserver ne '') {
$env{'form.otherserver'} = $otherserver;	$env{'form.otherserver'} = $otherserver;
}	}
	unless (($env{'form.origurl'}) \|\| ($r->uri eq '/adm/roles') \|\|
	($r->uri eq '/adm/switchserver') \|\| ($r->uri eq '/adm/sso')) {
	$env{'form.origurl'} = $r->uri;
	}
}	}

# ---------------------------------------------------------------- Check access	# ---------------------------------------------------------------- Check access