|
version 1.121, 2014/12/06 17:46:40
|
version 1.122, 2014/12/06 20:08:16
|
|
Line 534 sub file_submission {
|
Line 534 sub file_submission {
|
| my @todelete = map { "/uploaded/$udom/$uname/portfolio".$_; } keys(%port_delete); |
my @todelete = map { "/uploaded/$udom/$uname/portfolio".$_; } keys(%port_delete); |
| if (@tolock || @todelete) { |
if (@tolock || @todelete) { |
| if (ref($info) eq 'HASH') { |
if (ref($info) eq 'HASH') { |
| if ($info->{'ip'}) { |
if (($info->{'ip'}) && ($info->{'is_submit'})) { |
| my @adds; |
my @adds; |
| if (@tolock) { |
if (@tolock) { |
| @adds = map { "/uploaded/$udom/$uname/portfolio".$_; } @tolock; |
@adds = map { "/uploaded/$udom/$uname/portfolio".$_; } @tolock; |
![[BACK]](/icons/back.gif){kind=icon}
Return to essayresponse.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework