loncom/auth/publiccheck.pm - diff

Return to publiccheck.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.21, 2013/02/08 16:23:56	version 1.23, 2013/12/13 02:10:27
Line 44 sub handler {	Line 44 sub handler {
my $requrl=$r->uri;	my $requrl=$r->uri;

if (&Apache::lonnet::is_domainimage($requrl)) {	if (&Apache::lonnet::is_domainimage($requrl)) {
if (($r->user() eq '') && ($Apache::lonnet::apache >= 2.4)) {
$r->user('public');
}
return OK;	return OK;
}	}

if ($requrl =~ m{^/res/adm/pages/[^/]+\.(gif\|png)$}) {	if ($requrl =~ m{^/res/adm/pages/[^/]+\.(gif\|png)$}) {
if (($r->user() eq '') && ($Apache::lonnet::apache >= 2.4)) {
$r->user('public');
}
return OK;	return OK;
}	}

Line 70 sub handler {	Line 64 sub handler {
\|\| $requrl=~m\|^/adm/help/.*\.hlp$\|	\|\| $requrl=~m\|^/adm/help/.*\.hlp$\|
\|\| $requrl=~m\|^/adm/[^/]+/[^/]+/aboutme/portfolio$\|	\|\| $requrl=~m\|^/adm/[^/]+/[^/]+/aboutme/portfolio$\|
\|\| (&Apache::lonnet::metadata($requrl,'copyright') eq 'public')	\|\| (&Apache::lonnet::metadata($requrl,'copyright') eq 'public')
\|\| $requrl=~m\|^/adm/blockingstatus/.*$\|) {	\|\| $requrl=~m\|^/adm/blockingstatus/.*$\|) {
&process_public($r,$requrl);	&process_public($r,$requrl);
return OK;	return OK;
} elsif (&Apache::lonnet::is_portfolio_url($requrl)) {	} elsif (&Apache::lonnet::is_portfolio_url($requrl)) {