loncom/interface/lonmeta.pm - diff

Return to lonmeta.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.246, 2012/05/21 19:01:12	version 1.247, 2012/10/29 17:38:56
Line 874 sub report_bombs {	Line 874 sub report_bombs {
$uri = &Apache::lonnet::declutter($uri);	$uri = &Apache::lonnet::declutter($uri);
$r->print('<h1>'.&Apache::lonnet::clutter($uri).'</h1>');	$r->print('<h1>'.&Apache::lonnet::clutter($uri).'</h1>');
my ($domain,$author)=($uri=~/^($match_domain)\/($match_username)\//);	my ($domain,$author)=($uri=~/^($match_domain)\/($match_username)\//);
if (!&Apache::loncacc::constructaccess('/priv/'.$domain.'/'.$author.'/')) {	if (!&Apache::lonnet::constructaccess('/priv/'.$domain.'/'.$author.'/')) {
$r->print('<p class="LC_error">'.&mt('Not authorized').'</p>');	$r->print('<p class="LC_error">'.&mt('Not authorized').'</p>');
return;	return;
}	}