|
version 1.130, 2004/02/13 21:05:34
|
version 1.131, 2004/02/13 21:12:54
|
|
Line 535 sub start_stringresponse {
|
Line 535 sub start_stringresponse {
|
| [['inline','Inline']],$token); |
[['inline','Inline']],$token); |
| $result.=&Apache::edit::end_row().&Apache::edit::start_spanning_row(); |
$result.=&Apache::edit::end_row().&Apache::edit::start_spanning_row(); |
| } elsif ($target eq 'modified') { |
} elsif ($target eq 'modified') { |
| &Apache::edit::get_new_args($token,$parstack, |
my $constructtag; |
| $safeeval,'answer','type'); |
$constructtag=&Apache::edit::get_new_args($token,$parstack, |
| my $answerdisplay=$ENV{'form.'.&Apache::edit::html_element_name('answerdisplay')}; |
$safeeval,'answer', |
| if ($answerdisplay) { |
'type','answerdisplay'); |
| $token->[2]->{'answerdisplay'}=$answerdisplay; |
if ($constructtag) { |
| } else { |
$result = &Apache::edit::rebuild_tag($token); |
| delete $token->[2]->{'answerdisplay'}; |
$result.=&Apache::edit::handle_insert(); |
| } |
} |
| $result = &Apache::edit::rebuild_tag($token); |
|
| $result.=&Apache::edit::handle_insert(); |
|
| } elsif ($target eq 'answer' || $target eq 'grade') { |
} elsif ($target eq 'answer' || $target eq 'grade') { |
| &Apache::response::reset_params(); |
&Apache::response::reset_params(); |
| } |
} |
![[BACK]](/icons/back.gif){kind=icon}
Return to caparesponse.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework / caparesponse