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.

docs/changelog/7.x.x.txt

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

lib/WebGUI/AssetClipboard.pm

@@ -171,7 +171,7 @@ Duplicates self, cuts duplicate, returns self->getContainer->www_view if canEdit
 sub www_copy {
 	my $self = shift;
 	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->cut;
 	return $self->getContainer->www_view;