loncom/auth/checkauthen.pm - diff

Return to checkauthen.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.16, 2014/05/17 21:43:55	version 1.20, 2018/11/25 02:49:26
Line 1	Line 1
# The LearningOnline Network	# The LearningOnline Network
# checks for a cokkie to authenticate a user	# checks for a cookie to authenticate a user
#	#
# $Id$	# $Id$
#	#
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 eq '/adm/requestcourse') \|\| ($r->uri =~ m{^/tiny/[\w\-.]+/\w+$}))) {
$env{'form.firsturl'} = $r->uri;	$env{'form.firsturl'} = $r->uri;
}	}
return $fail;	return $fail;