--- loncom/publisher/lonupload.pm 2013/07/03 05:03:19 1.64 +++ loncom/publisher/lonupload.pm 2013/12/04 17:29:44 1.66 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to upload files into construction space # -# $Id: lonupload.pm,v 1.64 2013/07/03 05:03:19 raeburn Exp $ +# $Id: lonupload.pm,v 1.66 2013/12/04 17:29:44 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -201,9 +201,8 @@ sub phaseone { return; } $filesize = int($filesize/1000); #expressed in kb - my $authorspace = $Apache::lonnet::perlvar{'lonDocRoot'}."/priv/$udom/$uname"; - my $output = &Apache::loncommon::excess_filesize_authorspace($uname,$udom,$authorspace, - $env{'form.upfile.filename'},$filesize,'upload'); + my $output = &Apache::loncommon::excess_filesize_warning($uname,$udom,'author', + $env{'form.upfile.filename'},$filesize,'upload'); if ($output) { $r->print($output.&earlyout($fn,$uname,$udom)); return; @@ -394,7 +393,7 @@ sub check_extension { if ($pathchg) { if ($mode eq 'testbank') { $returnflag = 'embedded'; - $result .= '

'.&mt('Or [_1]continue[_2] the testbank import without modifying the references(s).','','').'

'; + $result .= '

'.&mt('Or [_1]continue[_2] the testbank import without modifying the reference(s).','','').'

'; } } }