loncom/homework/default_homework.lcpm - diff

Return to default_homework.lcpm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.61, 2003/04/30 21:10:50	version 1.62, 2003/05/23 07:04:44
Line 62 sub caparesponse_check {	Line 62 sub caparesponse_check {
$message .="no ws in :$response:\n";	$message .="no ws in :$response:\n";
}	}

	if (length($response) > 500) { return "TOO_LONG: Answer too long"; }

if ($type eq '' ) {	if ($type eq '' ) {
$message .= "Didn't find a type :$type:$expr: defaulting\n";	$message .= "Didn't find a type :$type:$expr: defaulting\n";
if ( $answer eq ($answer *1.0)) { $type = 2;	if ( $answer eq ($answer *1.0)) { $type = 2;