version 1.122, 2008/11/29 10:34:30
|
version 1.123, 2008/12/10 16:28:03
|
Line 242 sub upload_size_allowed {
|
Line 242 sub upload_size_allowed {
|
&Apache::loncommon::add_to_env("form.$item",$savesize); |
&Apache::loncommon::add_to_env("form.$item",$savesize); |
my $maxsize= &Apache::lonnet::EXT("resource.$ident.maxfilesize"); |
my $maxsize= &Apache::lonnet::EXT("resource.$ident.maxfilesize"); |
if (!$maxsize) { |
if (!$maxsize) { |
$maxsize = 100.0; |
$maxsize = 10.0; # FIXME This should become a domain configuration. |
} |
} |
if ($size > $maxsize) { |
if ($size > $maxsize) { |
my $warn = 'HWFILETOOBIG'.$ident; |
my $warn = 'HWFILETOOBIG'.$ident; |