loncom/auth/lonroles.pm - diff

Return to lonroles.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.299, 2014/03/19 16:20:36	version 1.300, 2014/03/25 09:29:43
Line 664 ENDENTERKEY	Line 664 ENDENTERKEY
}	}
}	}
}	}
	# Are we allowed to look at the first resource?
# If it's an external resource,
if ($furl =~ m{^(/adm/wrapper\|)/ext/}) {	if ($furl =~ m{^(/adm/wrapper\|)/ext/}) {
	# If it's an external resource,
# strip off the symb argument and possible query	# strip off the symb argument and possible query
my ($exturl,$symb) = ($furl =~ m{^(.+)(?:\?\|\&)symb=(.+)$});	my ($exturl,$symb) = ($furl =~ m{^(.+)(?:\?\|\&)symb=(.+)$});
# Unencode $symb	# Unencode $symb
Line 675 ENDENTERKEY	Line 675 ENDENTERKEY
if (!&Apache::lonnet::allowed('bre',$exturl,$symb)) {	if (!&Apache::lonnet::allowed('bre',$exturl,$symb)) {
$furl = &Apache::lonpageflip::first_accessible_resource();	$furl = &Apache::lonpageflip::first_accessible_resource();
}	}
# For local resources just check for permission	# For other resources just check for permission
} elsif (!&Apache::lonnet::allowed('bre',$furl)) {	} elsif (!&Apache::lonnet::allowed('bre',$furl)) {
$furl = &Apache::lonpageflip::first_accessible_resource();	$furl = &Apache::lonpageflip::first_accessible_resource();
}	}