--- loncom/homework/caparesponse/caparesponse.pm 2012/02/01 19:28:04 1.248.4.1 +++ loncom/homework/caparesponse/caparesponse.pm 2011/11/14 03:08:05 1.249 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # caparesponse definition # -# $Id: caparesponse.pm,v 1.248.4.1 2012/02/01 19:28:04 raeburn Exp $ +# $Id: caparesponse.pm,v 1.249 2011/11/14 03:08:05 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -293,7 +293,7 @@ sub start_numericalresponse { } elsif ($token->[1] eq 'formularesponse') { $constructtag=&Apache::edit::get_new_args($token,$parstack, $safeeval,'answer', - 'samples','preprocess'); + 'samples','preproces'); } if ($constructtag) { $result = &Apache::edit::rebuild_tag($token); @@ -1389,8 +1389,8 @@ sub end_stringresponse { } if ($target eq 'grade' || $target eq 'web' || $target eq 'answer' || $target eq 'tex' || $target eq 'analyze') { - &Apache::lonxml::increment_counter(&Apache::response::repetition(), - "$part.$id"); + my $repetition = &Apache::response::repetition(); + &Apache::lonxml::increment_counter($repetition,"$part.$id"); if ($target eq 'analyze') { &Apache::lonhomework::set_bubble_lines(); }