loncom/auth/lonroles.pm - diff

Return to lonroles.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.220, 2009/05/01 14:16:06	version 1.222, 2009/05/17 23:38:12
Line 170 $start_page	Line 170 $start_page
$swinfo	$swinfo
</script>	</script>
$navwindow	$navwindow
<h1>$msg</h1>	<p>$msg</p>
$end_page	$end_page
ENDREDIR	ENDREDIR
return;	return;
Line 444 ENDENTERKEY	Line 444 ENDENTERKEY
&Apache::lonnet::appenv(	&Apache::lonnet::appenv(
{"request.course.id" => $cdom.'_'.$cnum});	{"request.course.id" => $cdom.'_'.$cnum});
$furl='/adm/roles?tryagain=1';	$furl='/adm/roles?tryagain=1';
$msg=	$msg='<p><span class="LC_error">'
'<h1><span class="LC_error">'.	.&mt('Could not initialize [_1] at this time.',
&mt('Could not initialize [_1] at this time.',	$env{'course.'.$cdom.'_'.$cnum.'.description'})
$env{'course.'.$cdom.'_'.$cnum.'.description'}).	.'</span></p>'
'</span></h1><h3>'.&mt('Please try again.').'</h3>'.$ferr;	.'<p>'.&mt('Please try again.').'</p>'
	.'<p>'.$ferr.'</p>';
}	}
if (&Apache::lonnet::allowed('adv') eq 'F') { $tadv=1; }	if (&Apache::lonnet::allowed('adv') eq 'F') { $tadv=1; }
&Apache::lonnet::appenv({'request.role.adv'=>$tadv});	&Apache::lonnet::appenv({'request.role.adv'=>$tadv});