loncom/homework/hint.pm - diff - 1.56

Return to hint.pm CVS log

Up to [LON-CAPA] / loncom / homework

Diff for /loncom/homework/hint.pm between versions 1.53 and 1.56

version 1.53, 2004/03/16 22:24:31	version 1.56, 2004/08/24 16:01:18
Line 64 sub start_hintgroup {	Line 64 sub start_hintgroup {
$result .= '\keephidden{';	$result .= '\keephidden{';
} elsif ($target eq 'edit') {	} elsif ($target eq 'edit') {
$result.=&Apache::edit::tag_start($target,$token);	$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();	$result.=&Apache::edit::end_row().&Apache::edit::start_spanning_row();
} elsif ($target eq 'modified') {	} elsif ($target eq 'modified') {
my $constructtag=&Apache::edit::get_new_args($token,$parstack,$safeeval,'showoncorrect');	my $constructtag=&Apache::edit::get_new_args($token,$parstack,$safeeval,'showoncorrect');
Line 167 sub end_numericalhint {	Line 167 sub end_numericalhint {
my $response = $Apache::lonhomework::history{	my $response = $Apache::lonhomework::history{
"resource.$partid.$submitid.submission"};	"resource.$partid.$submitid.submission"};
&Apache::lonxml::debug("hintgroup is using $response<br />\n");	&Apache::lonxml::debug("hintgroup is using $response<br />\n");
my $hideunit=&Apache::response::get_response_param($submitid.'_'.$id,	my $hideunit=&Apache::response::get_response_param($partid.'_'.$submitid,'turnoffunit');
'turnoffunit');
my $args_ref= \%{$safeeval->varglob('LONCAPA::CAPAresponse_args')};	my $args_ref= \%{$safeeval->varglob('LONCAPA::CAPAresponse_args')};
$$args_ref{'response'}=$response;	$$args_ref{'response'}=$response;
#need to get all possible parms	#need to get all possible parms

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>