loncom/homework/essayresponse.pm - diff

Return to essayresponse.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.100.4.1, 2009/09/11 16:34:09	version 1.101.8.1, 2009/09/23 02:58:00
Line 63 sub start_essayresponse {	Line 63 sub start_essayresponse {
if ($env{'request.uri'} eq '/res/gci/gci/internal/submission.problem') {	if ($env{'request.uri'} eq '/res/gci/gci/internal/submission.problem') {
$result .= '<input type="hidden" name="HWDRAFT'.$part.'_'.$id.'" value="yes" />';	$result .= '<input type="hidden" name="HWDRAFT'.$part.'_'.$id.'" value="yes" />';
} else {	} else {
$result.= '<tr><td>'.	$result.= '<tr><td>'.
'<label>'.	'<label>'.
'<input type="radio" name="HWDRAFT'.$part.'_'.$id.'" value="yes" checked="checked" /> '.	'<input type="radio" name="HWDRAFT'.$part.'_'.$id.'" value="yes" checked="checked" /> '.
&mt('Submit entries below as answer to receive credit').	&mt('Submit entries below as answer to receive credit').
'</label> <br />'.	'</label> <br />'.
'<label>'.	'<label>'.
'<input type="radio" name="HWDRAFT'.$part.'_'.$id.'" value="no" /> '.	'<input type="radio" name="HWDRAFT'.$part.'_'.$id.'" value="no" /> '.
&mt('Save entries below as a draft answer (not submitting them for credit yet)').	&mt('Save entries below (not submitted for credit yet)').
'</label>'.	'</label>'.
'</td></tr>';	'</td></tr>';
}	}
}	}

if ($ncol > 0) {	if ($ncol > 0) {
$result .='<tr><td>'.'<label>'.	$result .='<tr><td>'.'<label>'.