--- loncom/homework/structuretags.pm	2004/08/25 20:12:15	1.260.2.3
+++ 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.3 2004/08/25 20:12:15 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
 #
@@ -353,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 = ();
@@ -860,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]");