loncom/homework/structuretags.pm - diff

Return to structuretags.pm CVS log

Up to [LON-CAPA] / loncom / homework

-version 1.317, 2005/11/08 19:35:56
+version 1.318, 2005/11/08 21:09:08
  Line 115  sub page_start {
  	    &Apache::lonxml::fontsettings();
      }
      my $body_tag_start;
-     if (!defined($found{'body'}) && $env{'request.state'} eq 'construct'
+     if (!defined($found{'body'}) && $env{'request.state'} eq 'construct') {
- 	&& $env{'environment.remote'} eq 'off') {
+ 	if ($env{'environment.remote'} eq 'off') {
- 	if ($target eq 'web' || $target eq 'edit') {
+ 	    if ($target eq 'web' || $target eq 'edit') {
- 	    $body_tag_start=&Apache::loncommon::bodytag();
+ 		$body_tag_start=&Apache::loncommon::bodytag();
- 	    $body_tag_start.=&Apache::lonxml::message_location();
+ 		$body_tag_start.=&Apache::lonxml::message_location();
+ 	    }
+ 	} else {
+ 	    if ($target eq 'web' || $target eq 'edit') {
+ 		$body_tag_start=&Apache::loncommon::bodytag(undef,undef,undef,1);
+ 		$body_tag_start.=&Apache::lonxml::message_location();
+ 	    }
  	}
      } elsif (!defined($found{'body'})) {
  	my $background=&Apache::lonxml::get_param('background',$parstack,