loncom/publisher/loncfile.pm - diff

Return to loncfile.pm CVS log

Up to [LON-CAPA] / loncom / publisher

version 1.130, 2024/09/03 10:40:04	version 1.131, 2024/09/26 22:43:36
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);