Return to default_homework.lcpm CVS log | Up to [LON-CAPA] / loncom / homework |
version 1.82, 2004/05/27 03:44:18 | version 1.83, 2004/05/27 03:46:02 |
---|---|
Line 69 sub caparesponse_check { | Line 69 sub caparesponse_check { |
$answer=~s/ +/ /g; | $answer=~s/ +/ /g; |
$response=~s/ +/ /g; | $response=~s/ +/ /g; |
} | } |
if ($type eq 'float') { $response=~s/,//g; } | |
if (length($response) > 500) { return "TOO_LONG: Answer too long"; } | if (length($response) > 500) { return "TOO_LONG: Answer too long"; } |
if ($type eq '' ) { | if ($type eq '' ) { |