|
version 1.578, 2014/03/09 15:49:48
|
version 1.580, 2014/03/11 00:57:23
|
|
Line 3175 sub process_file_upload {
|
Line 3175 sub process_file_upload {
|
| my $quotatype = 'unofficial'; |
my $quotatype = 'unofficial'; |
| if ($crstype eq 'Community') { |
if ($crstype eq 'Community') { |
| $quotatype = 'community'; |
$quotatype = 'community'; |
| } elsif ($env{'course.'.$coursedom.'_'.$coursenum.'.internal.instcode'}) { |
} elsif ($env{'course.'.$coursedom.'_'.$coursenum.'.internal.coursecode'}) { |
| $quotatype = 'official'; |
$quotatype = 'official'; |
| } elsif ($env{'course.'.$coursedom.'_'.$coursenum.'.internal.textbook'}) { |
} elsif ($env{'course.'.$coursedom.'_'.$coursenum.'.internal.textbook'}) { |
| $quotatype = 'textbook'; |
$quotatype = 'textbook'; |
|
Line 3183 sub process_file_upload {
|
Line 3183 sub process_file_upload {
|
| if (&Apache::loncommon::get_user_quota($coursenum,$coursedom,'course',$quotatype)) { |
if (&Apache::loncommon::get_user_quota($coursenum,$coursedom,'course',$quotatype)) { |
| $filesize = int($filesize/1000); #expressed in kb |
$filesize = int($filesize/1000); #expressed in kb |
| $$upload_output = &Apache::loncommon::excess_filesize_warning($coursenum,$coursedom,'course', |
$$upload_output = &Apache::loncommon::excess_filesize_warning($coursenum,$coursedom,'course', |
| $env{'form.uploaddoc.filename'},$filesize,'upload'); |
$env{'form.uploaddoc.filename'},$filesize, |
| |
'upload',$quotatype); |
| return if ($$upload_output); |
return if ($$upload_output); |
| } |
} |
| my ($parseaction,$showupload,$nextphase,$mimetype); |
my ($parseaction,$showupload,$nextphase,$mimetype); |
![[BACK]](/icons/back.gif){kind=icon}
Return to londocs.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface