loncom/homework/lonhomework.pm - diff

Return to lonhomework.pm CVS log

Up to [LON-CAPA] / loncom / homework

Diff for /loncom/homework/lonhomework.pm between versions 1.326 and 1.328

version 1.326, 2011/06/06 16:48:39	version 1.328, 2011/09/09 16:56:35
Line 376 sub check_access {	Line 376 sub check_access {
$date=&mt("can not be accessed from your location.");	$date=&mt("can not be accessed from your location.");
return($status,$date);	return($status,$date);
}	}
	if ($env{'form.grade_imsexport'}) {
	if (($env{'request.course.id'}) &&
	(&Apache::lonnet::allowed('mdc',$env{'request.course.id'}))) {
	return ('SHOW_ANSWER');
	}
	}
foreach my $temp ("opendate","duedate","answerdate") {	foreach my $temp ("opendate","duedate","answerdate") {
$lastdate = $date;	$lastdate = $date;
if ($temp eq 'duedate') {	if ($temp eq 'duedate') {
Line 899 sub editxmlmode {	Line 904 sub editxmlmode {
my $problem=&Apache::lonnet::getfile($file);	my $problem=&Apache::lonnet::getfile($file);
if ($problem eq -1) {	if ($problem eq -1) {
&Apache::lonxml::error(	&Apache::lonxml::error(
'<b> '	'<p class="LC_error">'
.&mt('Unable to find [_1]',	.&mt('Unable to find [_1]',
'<span class="LC_filename">'.$file.'</span>')	'<span class="LC_filename">'.$file.'</span>')
.'</b>');	.'</p>');

$problem='';	$problem='';
}	}
Line 1009 sub renderpage {	Line 1014 sub renderpage {
$problem='';	$problem='';
my $filename=(split('/',$file))[-1];	my $filename=(split('/',$file))[-1];
my $error =	my $error =
"<b> ".&mt('Unable to find [_1]',	'<p class="LC_error">'
	.&mt('Unable to find [_1]',
'<span class="LC_filename">'.$filename.'</span>')	'<span class="LC_filename">'.$filename.'</span>')
."</b>";	."</p>";
$result.=	$result.=
&Apache::loncommon::simple_error_page($request,'Not available',	&Apache::loncommon::simple_error_page($request,'Not available',
$error);	$error);

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

Removed from v.1.326
changed lines
	Added in v.1.328