|
version 1.129, 2009/10/20 01:57:38
|
version 1.130, 2009/11/03 03:06:07
|
|
Line 449 sub handler {
|
Line 449 sub handler {
|
| return OK; |
return OK; |
| } |
} |
| if (($access ne '2') && ($access ne 'F')) { |
if (($access ne '2') && ($access ne 'F')) { |
| $env{'user.error.msg'}="$requrl:bre:1:1:Access Denied"; |
if ($requrl =~ m{^/res/}) { |
| return HTTP_NOT_ACCEPTABLE; |
$access = &Apache::lonnet::allowed('bro',$requrl); |
| |
if ($access ne 'F') { |
| |
$env{'user.error.msg'}="$requrl:bre:1:1:Access Denied"; |
| |
return HTTP_NOT_ACCEPTABLE; |
| |
} |
| |
} else { |
| |
$env{'user.error.msg'}="$requrl:bre:1:1:Access Denied"; |
| |
return HTTP_NOT_ACCEPTABLE; |
| |
} |
| } |
} |
| } |
} |
| if ($requrl =~ m|^/prtspool/|) { |
if ($requrl =~ m|^/prtspool/|) { |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonacc.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / auth