loncom/homework/grades.pm - diff

Return to grades.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.359, 2006/05/30 12:45:36	version 1.360, 2006/06/12 00:34:45
Line 2458 sub handback_files {	Line 2458 sub handback_files {
$request->print('<font color="red"> An errror occured ('.$result.	$request->print('<font color="red"> An errror occured ('.$result.
') while trying to upload '.$newflg.'_'.$part_resp.'_returndoc'.$file_counter.'</font><br />');	') while trying to upload '.$newflg.'_'.$part_resp.'_returndoc'.$file_counter.'</font><br />');
} else {	} else {
	# mark the file as read only
	my @files = ($save_file_name);
	my @what = ($symb,'handback');
	&Apache::lonnet::mark_as_readonly($domain,$stuname,\@files,\@what);
my $subject = "File Handed Back by Instructor ";	my $subject = "File Handed Back by Instructor ";
my $message = "A file has been returned that was originally submitted in reponse to: <br />";	my $message = "A file has been returned that was originally submitted in reponse to: <br />";
$message .= "<strong>".&Apache::lonnet::gettitle($symb)."</strong><br />";	$message .= "<strong>".&Apache::lonnet::gettitle($symb)."</strong><br />";