![[BACK]](/icons/back.gif){kind=icon}
Return to portfolio.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface|
Return to portfolio.pm CVS log | Up to [LON-CAPA] / loncom / interface |
| version 1.226, 2010/10/27 01:02:29 | version 1.227, 2010/10/29 20:41:43 |
|---|---|
| Line 1937 sub upload { | Line 1937 sub upload { |
| $port_path,$disk_quota, | $port_path,$disk_quota, |
| $current_disk_usage,$uname,$udom); | $current_disk_usage,$uname,$udom); |
| if ($state eq 'will_exceed_quota' | if ($state eq 'will_exceed_quota' |
| || $state eq 'file_locked') { | || $state eq 'file_locked' |
| || $state eq 'zero_bytes') { | |
| $r->print($msg.&done('Back',$url)); | $r->print($msg.&done('Back',$url)); |
| return; | return; |
| } | } |