loncom/homework/default_homework.lcpm - diff

Return to default_homework.lcpm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.91, 2004/10/21 02:43:34	version 1.95, 2005/03/28 19:20:54
Line 163 sub caparesponse_check {	Line 163 sub caparesponse_check {
elsif ($result == '9') { $result='ANS_CNT_NOT_MATCH'; }	elsif ($result == '9') { $result='ANS_CNT_NOT_MATCH'; }
elsif ($result =='10') { $result='SUB_RECORDED'; }	elsif ($result =='10') { $result='SUB_RECORDED'; }
elsif ($result =='11') { $result='BAD_FORMULA'; }	elsif ($result =='11') { $result='BAD_FORMULA'; }
	elsif ($result =='12' && !$response) { $result='MISSING_ANSWER'; }
	elsif ($result =='12') { $result='WANTED_NUMERIC'; }
elsif ($result =='13') { $result='UNIT_INVALID_INSTRUCTOR'; }	elsif ($result =='13') { $result='UNIT_INVALID_INSTRUCTOR'; }
elsif ($result =='141') { $result='UNIT_INVALID_STUDENT'; }	elsif ($result =='141') { $result='UNIT_INVALID_STUDENT'; }
elsif ($result =='142') { $result='UNIT_INVALID_STUDENT'; }	elsif ($result =='142') { $result='UNIT_INVALID_STUDENT'; }
Line 540 sub chemparse {	Line 542 sub chemparse {
$formula .= '⇌ ';	$formula .= '⇌ ';
} else {	} else {
$formula .= &web('<=> ','<m>\ensuremath{\rightleftharpoons}</m> ',	$formula .= &web('<=> ','<m>\ensuremath{\rightleftharpoons}</m> ',
'<=$gt; ');	'<=> ');
}	}
next;	next;
}	}
Line 560 sub chemparse {	Line 562 sub chemparse {
}	}
# get rid of trailing space	# get rid of trailing space
$formula =~ s/(\&nbsp\;\| )$//;	$formula =~ s/(\&nbsp\;\| )$//;

return &xmlparse($formula);	return &xmlparse($formula);
}	}