fix: Package deploy: hidden assets become visible

This commit is contained in:
Yung Han Khoe 2007-06-11 16:26:03 +00:00
parent e5e2c4b2ca
commit fdd11a2b7b
2 changed files with 6 additions and 4 deletions

View file

@ -34,6 +34,7 @@
http://www.plainblack.com/rfe/request-for-enhancement/product-operation-based#v43RzN_dmRPokd9SCRKWUw
- Added a simple Single Sign On mechanism.
- Added the SessionId macro.
- fix: Package deploy: hidden assets become visible (Yung Han Khoe, United Knowledge)
7.3.19

View file

@ -48,17 +48,18 @@ sub duplicateBranch {
my $self = shift;
my $newAsset = $self->duplicate({skipAutoCommitWorkflows=>1});
my $contentPositions = $self->get("contentPositions");
my $assetsToHide = $self->get("assetsToHide");
foreach my $child (@{$self->getLineage(["children"],{returnObjects=>1})}) {
my $newChild = $child->duplicateBranch;
$newChild->setParent($newAsset);
if ($contentPositions) {
my ($oldChildId, $newChildId) = ($child->getId, $newChild->getId);
$contentPositions =~ s/\Q${oldChildId}\E/${newChildId}/g;
}
my ($oldChildId, $newChildId) = ($child->getId, $newChild->getId);
$contentPositions =~ s/\Q${oldChildId}\E/${newChildId}/g if ($contentPositions);
$assetsToHide =~ s/\Q${oldChildId}\E/${newChildId}/g if ($assetsToHide);
}
$newAsset->update({contentPositions=>$contentPositions}) if $contentPositions;
$newAsset->update({assetsToHide=>$assetsToHide}) if $assetsToHide;
return $newAsset;
}