loncom/homework/grades.pm - diff

Return to grades.pm CVS log

Up to [LON-CAPA] / loncom / homework

Diff for /loncom/homework/grades.pm between versions 1.602 and 1.604

version 1.602, 2010/03/25 19:56:33	version 1.604, 2010/04/01 00:58:43
Line 731 sub most_similar {	Line 731 sub most_similar {
sub initialverifyreceipt {	sub initialverifyreceipt {
my $request = shift;	my $request = shift;
&commonJSfunctions($request);	&commonJSfunctions($request);
$request->print('<form name="gradingMenu"><input type="submit" value="'.&mt('Verify Receipt No.').'" />'.	my ($symb) = &get_symb($request);
	return '<form name="gradingMenu"><input type="submit" value="'.&mt('Verify Receipt No.').'" />'.
&Apache::lonnet::recprefix($env{'request.course.id'}).	&Apache::lonnet::recprefix($env{'request.course.id'}).
'-<input type="text" name="receipt" size="4" />'.	'-<input type="text" name="receipt" size="4" />'.
"</form>\n");	'<input type="hidden" name="symb" value="'.&Apache::lonenc::check_encrypt($symb).'" />'."\n".
	'<input type="hidden" name="command" value="verify" />'.
	"</form>\n";
}	}

#--- Check whether a receipt number is valid.---	#--- Check whether a receipt number is valid.---
Line 1755 sub gradeBox {	Line 1758 sub gradeBox {
$line.='<option value="reset status">'.&mt('reset status').'</option></select>'."\n";	$line.='<option value="reset status">'.&mt('reset status').'</option></select>'."\n";


#&mt('<td><b>Part:</b></td><td>[_1]</td><td><b>Points:</b></td><td>[_2]</td><td>or</td><td>[_3]</td>',$display_part,$radio,$line);
$result .=	$result .=
'<td>'.$display_part.'</td><td>'.$radio.'</td><td>'.&mt('or').'</td><td>'.$line.'</td>';	'<td>'.$display_part.'</td><td>'.$radio.'</td><td>'.&mt('or').'</td><td>'.$line.'</td>';
$result.=&Apache::loncommon::end_data_table_row();	$result.=&Apache::loncommon::end_data_table_row();

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.602
changed lines
	Added in v.1.604