|
version 1.120, 2003/10/08 18:25:18
|
version 1.122, 2003/10/30 20:52:54
|
|
Line 145 sub start_textfield {
|
Line 145 sub start_textfield {
|
| } else { |
} else { |
| $result=$token->[4]; |
$result=$token->[4]; |
| } |
} |
| my $bodytext=&Apache::lonxml::get_all_text("/textfield",$parser); |
$result.=&Apache::edit::modifiedfield("/textfield",$parser); |
| $result.=&Apache::edit::modifiedfield(); |
|
| } elsif ($target eq 'tex') { |
} elsif ($target eq 'tex') { |
| my $number_of_lines = &Apache::lonxml::get_param('rows',$parstack,$safeeval); |
my $number_of_lines = &Apache::lonxml::get_param('rows',$parstack,$safeeval); |
| my $width_of_box = &Apache::lonxml::get_param('cols',$parstack,$safeeval); |
my $width_of_box = &Apache::lonxml::get_param('cols',$parstack,$safeeval); |
|
Line 621 sub gradestatus {
|
Line 620 sub gradestatus {
|
| |
|
| my $status = $Apache::inputtags::status['-1']; |
my $status = $Apache::inputtags::status['-1']; |
| &Apache::lonxml::debug("gradestatus has :$status:"); |
&Apache::lonxml::debug("gradestatus has :$status:"); |
| if ( $status ne 'CLOSED' && $status ne 'UNAVAILABLE') { |
if ( $status ne 'CLOSED' && $status ne 'UNAVAILABLE' && |
| |
$status ne 'INVALID_ACCESS') { |
| my $award = $Apache::lonhomework::history{"resource.$id.award"}; |
my $award = $Apache::lonhomework::history{"resource.$id.award"}; |
| my $solved = $Apache::lonhomework::history{"resource.$id.solved"}; |
my $solved = $Apache::lonhomework::history{"resource.$id.solved"}; |
| my $previous = $Apache::lonhomework::history{"resource.$id.previous"}; |
my $previous = $Apache::lonhomework::history{"resource.$id.previous"}; |
![[BACK]](/icons/back.gif){kind=icon}
Return to inputtags.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework