--- loncom/homework/structuretags.pm 2007/10/09 23:32:57 1.401 +++ loncom/homework/structuretags.pm 2007/10/12 18:45:47 1.403 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.401 2007/10/09 23:32:57 albertel Exp $ +# $Id: structuretags.pm,v 1.403 2007/10/12 18:45:47 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -158,7 +158,9 @@ sub page_start { } elsif (!defined($found{'body'}) && $env{'request.state'} eq 'construct') { if ($target eq 'web' || $target eq 'edit') { - # no extra args to bodytag + if ($env{'environment.remote'} ne 'off') { + $body_args{'only_body'} = 1; + } } } elsif (!defined($found{'body'})) { my %add_entries; @@ -1487,6 +1489,8 @@ sub start_part { @Apache::inputtags::previous=(); @Apache::inputtags::previous_version=(); $Apache::lonhomework::problemstatus=&get_problem_status($id); + &Apache::response::reset_params(); + my $hidden=&Apache::loncommon::check_if_partid_hidden($Apache::inputtags::part); my $newtype=&Apache::lonnet::EXT("resource.$id.type"); if ($newtype) { $Apache::lonhomework::type=$newtype; }