Make clipboard copies not do the bizarre thing that duplicate usually does

where the duplicate asset becomes a child of the original.  This fixes the
error with copying Collaboration System assets.
This commit is contained in:
Drake 2006-09-21 01:12:56 +00:00
parent 08858c20c3
commit fcbefb7286
2 changed files with 2 additions and 1 deletions

View file

@ -10,6 +10,7 @@
- fix: Spectre pings not using correct IP address - fix: Spectre pings not using correct IP address
- fix: search functionality throwing fatal errors - fix: search functionality throwing fatal errors
- fix: DBI connect errors infinitely recurse - fix: DBI connect errors infinitely recurse
- fix: copying Collaboration System assets failing
7.0.7 7.0.7
- rfe: Image Management (funded by Formation Design Systems) - rfe: Image Management (funded by Formation Design Systems)

View file

@ -171,7 +171,7 @@ Duplicates self, cuts duplicate, returns self->getContainer->www_view if canEdit
sub www_copy { sub www_copy {
my $self = shift; my $self = shift;
return $self->session->privilege->insufficient() unless $self->canEdit; return $self->session->privilege->insufficient() unless $self->canEdit;
my $newAsset = $self->duplicate; my $newAsset = $self->getParent->duplicate($self);
$newAsset->update({ title=>$self->getTitle.' (copy)'}); $newAsset->update({ title=>$self->getTitle.' (copy)'});
$newAsset->cut; $newAsset->cut;
return $self->getContainer->www_view; return $self->getContainer->www_view;