[LON-CAPA-cvs] cvs: loncom(version_2_10_X) /homework structuretags.pm

[raeburn]

raeburn		Tue May 18 21:03:15 2010 EDT

  Modified files:              (Branch: version_2_10_X)
    /loncom/homework	structuretags.pm 
  Log:
  - Backport 1.468.
  
  
Index: loncom/homework/structuretags.pm
diff -u loncom/homework/structuretags.pm:1.465 loncom/homework/structuretags.pm:1.465.2.1
--- loncom/homework/structuretags.pm:1.465	Sun Feb 28 23:28:54 2010
+++ loncom/homework/structuretags.pm	Tue May 18 21:03:15 2010
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA 
 # definition of tags that give a structure to a document
 #
-# $Id: structuretags.pm,v 1.465 2010/02/28 23:28:54 raeburn Exp $
+# $Id: structuretags.pm,v 1.465.2.1 2010/05/18 21:03:15 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1494,7 +1494,7 @@
 
     if ($target eq 'web' || $target eq 'grade'   || $target eq 'answer' ||
 	$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')) {
 	    my $skip=&Apache::lonxml::get_all_text("/instructorcomment",
 						   $parser,$style);