loncom/homework/structuretags.pm - diff

Return to structuretags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.467, 2010/03/21 18:31:45	version 1.468, 2010/03/26 00:49:36
Line 1479 sub start_instructorcomment {	Line 1479 sub start_instructorcomment {

if ($target eq 'web' \|\| $target eq 'grade' \|\| $target eq 'answer' \|\|	if ($target eq 'web' \|\| $target eq 'grade' \|\| $target eq 'answer' \|\|
$target eq 'tex' \|\| $target eq 'analyze' \|\| $target eq 'webgrade') {	$target eq 'tex' \|\| $target eq 'analyze' \|\| $target eq 'webgrade') {
$result=($env{'request.role'}=~/^(in\|cc\|au\|ca\|li)/);	$result=($env{'request.role'}=~/^(in\|cc\|co\|au\|ca\|li)/);
if ( (! $result) or ($env{'form.instructor_comments'} eq 'hide')) {	if ( (! $result) or ($env{'form.instructor_comments'} eq 'hide')) {
my $skip=&Apache::lonxml::get_all_text("/instructorcomment",	my $skip=&Apache::lonxml::get_all_text("/instructorcomment",
$parser,$style);	$parser,$style);