loncom/homework/inputtags.pm - diff

Return to inputtags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.161, 2005/03/31 21:30:54	version 1.163, 2005/03/31 21:34:34
Line 306 sub file_selector {	Line 306 sub file_selector {
if (!$uploadedfiletypes) { return ''; }	if (!$uploadedfiletypes) { return ''; }
my $result;	my $result;

$result.='<tr><td>'.	$result.='<tr><td>';
&mt('Allowed filetypes: <b>[_1]</b>',$uploadedfiletypes).'<br />';	if ($uploadedfiletypes ne '*') {
	$result.=
	&mt('Allowed filetypes: <b>[_1]</b>',$uploadedfiletypes).'<br />';
	}
if ($which eq 'uploadonly' \|\| $which eq 'both') {	if ($which eq 'uploadonly' \|\| $which eq 'both') {
$result.=&mt('Submit a file: (only one file can be uploaded)').	$result.=&mt('Submit a file: (only one file can be uploaded)').
' <br /><input type="file" size="50" name="HWFILE'.	' <br /><input type="file" size="50" name="HWFILE'.
Line 833 sub gradestatus {	Line 836 sub gradestatus {
}	}
if ($Apache::lonhomework::history{"resource.$id.afterduedate"}) {	if ($Apache::lonhomework::history{"resource.$id.afterduedate"}) {
#last submissions was after due date	#last submissions was after due date
if ($target eq 'tex') {	$latemessage=&mt(' The last submission was after the Due Date ');;
$latemessage=' The last submission was after the Due Date ';	if ($target eq 'web') {
} else {	$latemessage='<td bgcolor="#ffaaaa">'.$latemessage.'</td>';
$latemessage="<td bgcolor=\"#ffaaaa\">The last submission was after the Due Date</td>";
}	}
}	}
}	}