|
version 1.183, 2003/06/13 14:01:26
|
version 1.185, 2003/06/17 15:36:11
|
|
Line 266 ENDCHECKOUT
|
Line 266 ENDCHECKOUT
|
| sub start_problem { |
sub start_problem { |
| my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_; |
my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_; |
| |
|
| $Apache::lonhomework::parsing_a_problem=1; |
if ( $Apache::inputtags::part ne '' || |
| if ( $Apache::inputtags::part ne '' ) { |
$Apache::lonhomework::parsing_a_problem) { |
| &Apache::lonxml::error('Only one problem allowed in a .problem file'); |
&Apache::lonxml::error('Only one <problem> allowed in a .problem file'); |
| my $bodytext=&Apache::lonxml::get_all_text("/problem",$parser); |
#my $bodytext=&Apache::lonxml::get_all_text("/problem",$parser); |
| return ''; |
return ''; |
| } |
} |
| |
|
| |
$Apache::lonhomework::parsing_a_problem=1; |
| #initialize globals |
#initialize globals |
| $Apache::inputtags::part='0'; |
$Apache::inputtags::part='0'; |
| @Apache::inputtags::partlist=('0'); |
@Apache::inputtags::partlist=('0'); |
|
Line 345 sub start_problem {
|
Line 347 sub start_problem {
|
| '<input type="submit" name="resetdata" |
'<input type="submit" name="resetdata" |
| value="New Problem Variation" />'. |
value="New Problem Variation" />'. |
| '<input type="hidden" name="username" |
'<input type="hidden" name="username" |
| value="'.$ENV{'form.username'}.'" />'; |
value="'.$ENV{'form.username'}.'" /> <br />'; |
| } |
} |
| ($status,$accessmsg) = &Apache::lonhomework::check_access('0'); |
($status,$accessmsg) = &Apache::lonhomework::check_access('0'); |
| push (@Apache::inputtags::status,$status); |
push (@Apache::inputtags::status,$status); |
![[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