|
version 1.212, 2003/10/03 15:27:02
|
version 1.215, 2003/10/09 21:49:24
|
|
Line 355 sub start_problem {
|
Line 355 sub start_problem {
|
| } |
} |
| |
|
| #added vars to the scripting enviroment |
#added vars to the scripting enviroment |
| my $expression='$external::part='.$Apache::inputtags::part.';'; |
my $expression='$external::part=\''.$Apache::inputtags::part.'\';'; |
| &Apache::run::run($expression,$safeeval); |
&Apache::run::run($expression,$safeeval); |
| my $status; |
my $status; |
| my $accessmsg; |
my $accessmsg; |
|
Line 574 sub end_problem {
|
Line 574 sub end_problem {
|
| @Apache::inputtags::response=(); |
@Apache::inputtags::response=(); |
| $result=&Apache::response::mandatory_part_meta; |
$result=&Apache::response::mandatory_part_meta; |
| } |
} |
| |
$result.=&Apache::response::meta_part_order(); |
| } elsif ($target eq 'edit') { |
} elsif ($target eq 'edit') { |
| &Apache::lonxml::debug("in end_problem with $target, edit"); |
&Apache::lonxml::debug("in end_problem with $target, edit"); |
| $result = &problem_edit_footer(); |
$result = &problem_edit_footer(); |
|
Line 939 sub start_part {
|
Line 940 sub start_part {
|
| $Apache::lonhomework::problemstatus= |
$Apache::lonhomework::problemstatus= |
| &Apache::lonnet::EXT("resource.$id.problemstatus"); |
&Apache::lonnet::EXT("resource.$id.problemstatus"); |
| my $hidden=&Apache::loncommon::check_if_partid_hidden($Apache::inputtags::part); |
my $hidden=&Apache::loncommon::check_if_partid_hidden($Apache::inputtags::part); |
| my $expression='$external::part='.$Apache::inputtags::part.';'; |
my $expression='$external::part=\''.$Apache::inputtags::part.'\';'; |
| &Apache::run::run($expression,$safeeval); |
&Apache::run::run($expression,$safeeval); |
| |
|
| if ($target eq 'meta') { |
if ($target eq 'meta') { |
![[BACK]](/icons/back.gif){kind=icon}
Return to structuretags.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework