--- loncom/homework/hint.pm 2004/03/16 22:24:31 1.53 +++ loncom/homework/hint.pm 2004/08/24 16:01:18 1.56 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # implements the tags that control the hints # -# $Id: hint.pm,v 1.53 2004/03/16 22:24:31 albertel Exp $ +# $Id: hint.pm,v 1.56 2004/08/24 16:01:18 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -64,7 +64,7 @@ sub start_hintgroup { $result .= '\keephidden{'; } elsif ($target eq 'edit') { $result.=&Apache::edit::tag_start($target,$token); - $result.=&Apache::edit::select_arg('Show hint when problem Correct:','showoncorrect',[['no',&mt('No')],['yes',&mt('Yes')]]); + $result.=&Apache::edit::select_arg('Show hint even if problem Correct:','showoncorrect',[['no',&mt('No')],['yes',&mt('Yes')]],$token); $result.=&Apache::edit::end_row().&Apache::edit::start_spanning_row(); } elsif ($target eq 'modified') { my $constructtag=&Apache::edit::get_new_args($token,$parstack,$safeeval,'showoncorrect'); @@ -167,8 +167,7 @@ sub end_numericalhint { my $response = $Apache::lonhomework::history{ "resource.$partid.$submitid.submission"}; &Apache::lonxml::debug("hintgroup is using $response
\n"); - my $hideunit=&Apache::response::get_response_param($submitid.'_'.$id, - 'turnoffunit'); + my $hideunit=&Apache::response::get_response_param($partid.'_'.$submitid,'turnoffunit'); my $args_ref= \%{$safeeval->varglob('LONCAPA::CAPAresponse_args')}; $$args_ref{'response'}=$response; #need to get all possible parms