|
version 1.76, 2003/01/13 21:22:00
|
version 1.77, 2003/02/23 20:31:51
|
|
Line 85 sub start_numericalresponse {
|
Line 85 sub start_numericalresponse {
|
| $result.=&Apache::edit::tag_start($target,$token); |
$result.=&Apache::edit::tag_start($target,$token); |
| $result.=&Apache::edit::text_arg('Answer:','answer',$token); |
$result.=&Apache::edit::text_arg('Answer:','answer',$token); |
| if ($token->[1] eq 'numericalresponse') { |
if ($token->[1] eq 'numericalresponse') { |
| $result.=&Apache::edit::text_arg('Unit:','unit',$token,5); |
$result.=&Apache::edit::text_arg('Unit:','unit',$token,5). |
| $result.=&Apache::edit::text_arg('Format:','format',$token,4); |
&Apache::loncommon::help_open_topic('Physical_Units'); |
| |
$result.=&Apache::edit::text_arg('Format:','format',$token,4). |
| |
&Apache::loncommon::help_open_topic('Numerical_Response_Format'); |
| } elsif ($token->[1] eq 'stringresponse') { |
} elsif ($token->[1] eq 'stringresponse') { |
| $result.=&Apache::edit::select_arg('Type:','type', |
$result.=&Apache::edit::select_arg('Type:','type', |
| [['cs','Case Sensitive'],['ci','Case Insensitive'], |
[['cs','Case Sensitive'],['ci','Case Insensitive'], |
![[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