loncom/auth/lonacc.pm - diff

Return to lonacc.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.56, 2004/12/23 19:40:12	version 1.58, 2004/12/28 20:28:55
Line 138 sub handler {	Line 138 sub handler {
}	}
} else {	} else {
$symb=&Apache::lonnet::symbread($requrl);	$symb=&Apache::lonnet::symbread($requrl);
if ($requrl !~ m\|^/res/adm/\| &&	if (&Apache::lonnet::is_on_map($requrl) && $symb &&
!&Apache::lonnet::symbverify($symb,$requrl)) {	!&Apache::lonnet::symbverify($symb,$requrl)) {
$r->log_reason('Invalid symb for '.$requrl.': '.	$r->log_reason('Invalid symb for '.$requrl.': '.$symb);
$symb);
$ENV{'user.error.msg'}=	$ENV{'user.error.msg'}=
"$requrl:bre:1:1:Invalid Access";	"$requrl:bre:1:1:Invalid Access";
return HTTP_NOT_ACCEPTABLE;	return HTTP_NOT_ACCEPTABLE;