loncom/homework/caparesponse/caparesponse.pm - diff

Return to caparesponse.pm CVS log

Up to [LON-CAPA] / loncom / homework / caparesponse

version 1.140, 2004/03/12 18:41:43	version 1.141, 2004/03/12 21:06:19
Line 159 sub end_numericalresponse {	Line 159 sub end_numericalresponse {
&Apache::lonxml::debug('answer is'.join(':',@answer));	&Apache::lonxml::debug('answer is'.join(':',@answer));
@{$safeeval->varglob('CAPARESPONSE_CHECK_LIST_answer')}=@answer;	@{$safeeval->varglob('CAPARESPONSE_CHECK_LIST_answer')}=@answer;

$result = &Apache::run::run($expression,$safeeval);	($result,my @msgs) = &Apache::run::run($expression,$safeeval);
	&Apache::lonxml::debug('msgs are'.join(':',@msgs));
my ($awards) = split /:/ , $result;	my ($awards) = split /:/ , $result;
($ad) = &Apache::inputtags::finalizeawards(split /,/ , $awards);	($ad) = &Apache::inputtags::finalizeawards(split /,/ , $awards);
&Apache::lonxml::debug("$expression");	&Apache::lonxml::debug("$expression");