--- loncom/publisher/loncfile.pm 2013/07/03 05:03:19 1.120
+++ loncom/publisher/loncfile.pm 2013/07/23 13:40:20 1.121
@@ -9,7 +9,7 @@
# and displays a page showing the results of the action.
#
#
-# $Id: loncfile.pm,v 1.120 2013/07/03 05:03:19 raeburn Exp $
+# $Id: loncfile.pm,v 1.121 2013/07/23 13:40:20 bisitz Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -709,8 +709,8 @@ sub Copy1 {
my $filesize = $fileinfo[7];
$filesize = int($filesize/1000); #expressed in kb
my $authorspace = $Apache::lonnet::perlvar{'lonDocRoot'}."/priv/$domain/$user";
- my $output = &Apache::loncommon::excess_filesize_authorspace($user,$domain,$authorspace,
- $fname,$filesize,'copy');
+ my $output = &Apache::loncommon::excess_filesize_warning($user,$domain,$authorspace,
+ $fname,$filesize,'copy');
if ($output) {
$request->print($output.'
'.&mt('Cancel').'');
return;