--- loncom/homework/caparesponse/caparesponse.pm 2003/01/13 21:22:00 1.76 +++ loncom/homework/caparesponse/caparesponse.pm 2003/02/23 20:31:51 1.77 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # caparesponse definition # -# $Id: caparesponse.pm,v 1.76 2003/01/13 21:22:00 sakharuk Exp $ +# $Id: caparesponse.pm,v 1.77 2003/02/23 20:31:51 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -85,8 +85,10 @@ sub start_numericalresponse { $result.=&Apache::edit::tag_start($target,$token); $result.=&Apache::edit::text_arg('Answer:','answer',$token); if ($token->[1] eq 'numericalresponse') { - $result.=&Apache::edit::text_arg('Unit:','unit',$token,5); - $result.=&Apache::edit::text_arg('Format:','format',$token,4); + $result.=&Apache::edit::text_arg('Unit:','unit',$token,5). + &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') { $result.=&Apache::edit::select_arg('Type:','type', [['cs','Case Sensitive'],['ci','Case Insensitive'],