--- loncom/homework/structuretags.pm 2004/08/13 18:51:33 1.260.2.1 +++ loncom/homework/structuretags.pm 2004/09/22 20:49:45 1.260.2.5 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.260.2.1 2004/08/13 18:51:33 albertel Exp $ +# $Id: structuretags.pm,v 1.260.2.5 2004/09/22 20:49:45 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -58,7 +58,6 @@ sub start_tex { my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_; my $result=''; my $bodytext=&Apache::lonxml::get_all_text("/tex",$parser); - &Apache::lonnet::logthis("Hrrm? $bodytext --"); if ($target eq 'tex') { return $bodytext.' '; } @@ -354,12 +353,13 @@ sub init_problem_globals { if ($type eq 'problem') { $Apache::inputtags::part='0'; @Apache::inputtags::partlist=('0'); - - $Apache::lonhomework::problemstatus=&get_problem_status('0') - } else { + $Apache::lonhomework::problemstatus=&get_problem_status('0'); + $Apache::lonhomework::ignore_response_errors=0; + } elsif ($type eq 'library') { $Apache::inputtags::part=''; @Apache::inputtags::partlist=(); $Apache::lonhomework::problemstatus=''; + $Apache::lonhomework::ignore_response_errors=1; } @Apache::inputtags::responselist = (); @Apache::inputtags::importlist = (); @@ -861,7 +861,7 @@ sub start_instructorcomment { if ($target eq 'web' || $target eq 'grade' || $target eq 'answer' || $target eq 'tex' || $target eq 'analyze') { $result=($ENV{'request.role'}=~/^(in|cc|au|ca|li)/); - if ( ! $result ) { + if ( (! $result) or ($ENV{'form.instructor_comments'} eq 'hide')) { my $skip=&Apache::lonxml::get_all_text("/instructorcomment", $parser,$style); &Apache::lonxml::debug("skipping ahead :$skip: $$parser[-1]"); @@ -1148,7 +1148,7 @@ sub end_part { $gradestatus=''; } $result=$gradestatus; - if ($$tagstack[-2] eq 'td') {$result.='\end{minipage}';} + if ($$tagstack[-2] eq 'td' and $target eq 'tex') {$result.='\end{minipage}';} } elsif ($target eq 'edit') { $result=&Apache::edit::end_table(); }