rat/lonpage.pm - diff

Return to lonpage.pm CVS log

Up to [LON-CAPA] / rat

version 1.96, 2011/07/28 03:14:09	version 1.98, 2012/11/30 18:16:53
Line 603 sub get_buttons {	Line 603 sub get_buttons {
'<img src="/adm/lonMisc/cat_button.png" class="LC_icon" />'.	'<img src="/adm/lonMisc/cat_button.png" class="LC_icon" />'.
'</a>';	'</a>';
}	}
$metainfo .= '<a href="/adm/evaluate?postdata='.	if ($hash->{'src_'.$rid} !~ m{^/uploaded/}) {
&escape($esrc).	$metainfo .= '<a href="/adm/evaluate?postdata='.
'" target="LONcatInfo">'.	&escape($esrc).
'<img src="/adm/lonMisc/eval_button.png" class="LC_icon" />'.	'" target="LONcatInfo">'.
'</a>';	'<img src="/adm/lonMisc/eval_button.png" class="LC_icon" />'.
if (($hash->{'src_'.$rid}=~/\.(problem\|exam\|quiz\|assess\|survey\|form)$/) &&	'</a>';
	}
	if (($hash->{'src_'.$rid}=~/$LONCAPA::assess_re/) &&
($hash->{'src_'.$rid} !~ m-^/uploaded/-)) {	($hash->{'src_'.$rid} !~ m-^/uploaded/-)) {

if (&Apache::lonnet::allowed('mgr',$env{'request.course.id'})) {	if (&Apache::lonnet::allowed('mgr',$env{'request.course.id'})) {