--- loncom/homework/structuretags.pm 2004/08/29 07:51:22 1.260.2.4 +++ 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.4 2004/08/29 07:51:22 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 # @@ -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]");