version 1.129.2.2, 2024/09/03 11:07:47
|
version 1.129.2.3, 2024/09/26 23:04:06
|
Line 1686 sub phasetwo {
|
Line 1686 sub phasetwo {
|
} |
} |
$dest = $dir."/."; |
$dest = $dir."/."; |
} elsif ($env{'form.action'} eq 'archive') { |
} elsif ($env{'form.action'} eq 'archive') { |
if (($env{'environment.archive'}) && |
if (($env{'environment.canarchive'}) && |
($env{'user.name'} eq $uname) && |
($env{'user.name'} eq $uname) && |
($env{'user.domain'} eq $udom)) { |
($env{'user.domain'} eq $udom)) { |
&Archive2($r,$uname,$udom,$fn,$identifier); |
&Archive2($r,$uname,$udom,$fn,$identifier); |