loncom/homework/structuretags.pm - diff

Return to structuretags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.401, 2007/10/09 23:32:57	version 1.403, 2007/10/12 18:45:47
Line 158 sub page_start {	Line 158 sub page_start {
} elsif (!defined($found{'body'})	} elsif (!defined($found{'body'})
&& $env{'request.state'} eq 'construct') {	&& $env{'request.state'} eq 'construct') {
if ($target eq 'web' \|\| $target eq 'edit') {	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'})) {	} elsif (!defined($found{'body'})) {
my %add_entries;	my %add_entries;
Line 1487 sub start_part {	Line 1489 sub start_part {
@Apache::inputtags::previous=();	@Apache::inputtags::previous=();
@Apache::inputtags::previous_version=();	@Apache::inputtags::previous_version=();
$Apache::lonhomework::problemstatus=&get_problem_status($id);	$Apache::lonhomework::problemstatus=&get_problem_status($id);
	&Apache::response::reset_params();

my $hidden=&Apache::loncommon::check_if_partid_hidden($Apache::inputtags::part);	my $hidden=&Apache::loncommon::check_if_partid_hidden($Apache::inputtags::part);
my $newtype=&Apache::lonnet::EXT("resource.$id.type");	my $newtype=&Apache::lonnet::EXT("resource.$id.type");
if ($newtype) { $Apache::lonhomework::type=$newtype; }	if ($newtype) { $Apache::lonhomework::type=$newtype; }