loncom/publisher/lonupload.pm - diff

Return to lonupload.pm CVS log

Up to [LON-CAPA] / loncom / publisher

version 1.64, 2013/07/03 05:03:19	version 1.66, 2013/12/04 17:29:44
Line 201 sub phaseone {	Line 201 sub phaseone {
return;	return;
}	}
$filesize = int($filesize/1000); #expressed in kb	$filesize = int($filesize/1000); #expressed in kb
my $authorspace = $Apache::lonnet::perlvar{'lonDocRoot'}."/priv/$udom/$uname";	my $output = &Apache::loncommon::excess_filesize_warning($uname,$udom,'author',
my $output = &Apache::loncommon::excess_filesize_authorspace($uname,$udom,$authorspace,	$env{'form.upfile.filename'},$filesize,'upload');
$env{'form.upfile.filename'},$filesize,'upload');
if ($output) {	if ($output) {
$r->print($output.&earlyout($fn,$uname,$udom));	$r->print($output.&earlyout($fn,$uname,$udom));
return;	return;
Line 394 sub check_extension {	Line 393 sub check_extension {
if ($pathchg) {	if ($pathchg) {
if ($mode eq 'testbank') {	if ($mode eq 'testbank') {
$returnflag = 'embedded';	$returnflag = 'embedded';
$result .= '<p>'.&mt('Or [_1]continue[_2] the testbank import without modifying the references(s).','<a href="javascript:document.testbankForm.submit();">','</a>').'</p>';	$result .= '<p>'.&mt('Or [_1]continue[_2] the testbank import without modifying the reference(s).','<a href="javascript:document.testbankForm.submit();">','</a>').'</p>';
}	}
}	}
}	}