loncom/homework/hint.pm - diff

Return to hint.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.13, 2001/06/02 03:59:59	version 1.17, 2001/08/11 17:06:52
Line 55 sub end_hintgroup {	Line 55 sub end_hintgroup {
}	}

sub start_numericalhint {	sub start_numericalhint {
	my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_;
#do everything in end, so intervening <responseparams> work	#do everything in end, so intervening <responseparams> work
	&Apache::response::start_hintresponse($parstack,$safeeval);
return '';	return '';
}	}

Line 78 sub end_numericalhint {	Line 80 sub end_numericalhint {
my ($ad) = &Apache::inputtags::finalizeawards(split /,/ , $awards);	my ($ad) = &Apache::inputtags::finalizeawards(split /,/ , $awards);
if ($ad eq 'EXACT_ANS' \|\| $ad eq 'APPROX_ANS') { push (@Apache::hint::which,$name); }	if ($ad eq 'EXACT_ANS' \|\| $ad eq 'APPROX_ANS') { push (@Apache::hint::which,$name); }
$result='';	$result='';
	} elsif ($target eq 'meta') {
	$result=&Apache::response::meta_package_write('numericalhint');
}	}
	&Apache::response::end_hintresponse();
return $result;	return $result;
}	}