--- loncom/homework/chemresponse.pm 2008/09/21 20:09:06 1.81 +++ loncom/homework/chemresponse.pm 2008/09/21 20:28:27 1.82 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # chemical equation style response # -# $Id: chemresponse.pm,v 1.81 2008/09/21 20:09:06 raeburn Exp $ +# $Id: chemresponse.pm,v 1.82 2008/09/21 20:28:27 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -503,11 +503,13 @@ sub start_reactionresponse { $result .=&Apache::edit::tag_start($target,$token); my $answer=&Apache::lonxml::get_param('answer',$parstack, $safeeval); - $result .=''. + $result .=''. &Apache::edit::text_arg('Answer:','answer',$token,40); + $result .=&edit_reaction_button($id,&Apache::edit::html_element_name('answer'),$answer).''; my $initial=&Apache::lonxml::get_param('initial',$parstack,$safeeval); - $result.=''. + $result.=''. &Apache::edit::text_arg('Initial Reaction:','initial',$token,40); + $result .=&edit_reaction_button($id,&Apache::edit::html_element_name('initial'),$initial).''; $result .=&Apache::edit::end_row().&Apache::edit::start_spanning_row(); } elsif ($target eq 'modified') { my $constructtag=&Apache::edit::get_new_args($token,$parstack,