loncom/auth/checkauthen.pm - diff

Return to checkauthen.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.20, 2018/11/25 02:49:26	version 1.21, 2018/12/24 14:29:48
Line 99 sub handler {	Line 99 sub handler {
}	}
if (($fail == FORBIDDEN) &&	if (($fail == FORBIDDEN) &&
(($r->uri eq '/adm/email') \|\| ($r->uri eq '/adm/preferences') \|\|	(($r->uri eq '/adm/email') \|\| ($r->uri eq '/adm/preferences') \|\|
($r->uri eq '/adm/requestcourse') \|\| ($r->uri =~ m{^/tiny/[\w\-.]+/\w+$}))) {	($r->uri eq '/adm/requestcourse') \|\|
	(($r->is_initial_req()) && ($r->uri =~ m{^/tiny/[\w\-.]+/\w+$})))) {
$env{'form.firsturl'} = $r->uri;	$env{'form.firsturl'} = $r->uri;
}	}
return $fail;	return $fail;