--- loncom/homework/structuretags.pm	2005/04/25 21:40:33	1.290
+++ loncom/homework/structuretags.pm	2005/04/29 21:22:33	1.291
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA 
 # definition of tags that give a structure to a document
 #
-# $Id: structuretags.pm,v 1.290 2005/04/25 21:40:33 albertel Exp $
+# $Id: structuretags.pm,v 1.291 2005/04/29 21:22:33 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -96,6 +96,7 @@ sub body_tag_start {
     }
     return $body_tag_start;
 }
+
 sub page_start {
     my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_;
     my %found;
@@ -126,7 +127,8 @@ sub page_start {
 	my $bgcolor=&Apache::lonxml::get_param('bgcolor',$parstack,
 					       $safeeval);
 	$body_tag_start=&body_tag_start($background,$bgcolor);
-	if ($target eq 'web' && $env{'request.state'} ne 'construct') {
+	if ( ($target eq 'web' || $target eq 'webgrade')
+	     && $env{'request.state'} ne 'construct') {
 	    my ($symb,undef,undef,undef,$publicuser)=
 		&Apache::lonxml::whichuser();
 	    if ($symb eq '' && !$publicuser) {