|
version 1.76, 2003/01/13 21:22:00
|
version 1.78, 2003/02/27 20:31:34
|
|
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'], |
| ['mc','Case Insensitive, Any Order']],$token); |
['mc','Case Insensitive, Any Order']],$token); |
| } elsif ($token->[1] eq 'formularesponse') { |
} elsif ($token->[1] eq 'formularesponse') { |
| $result.=&Apache::edit::text_arg('Sample Points:','samples',$token,40); |
$result.=&Apache::edit::text_arg('Sample Points:','samples',$token,40). |
| |
&Apache::loncommon::help_open_topic('Formula_Response_Sampling'); |
| } |
} |
| $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') { |
![[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