Description of problem:


Version-Release number of selected component (if applicable):


How reproducible:


Steps to Reproduce:
1. Prepare the perl script using below part:

  my $migflags = Sys::Virt::Domain::MIGRATE_LIVE |
                 Sys::Virt::Domain::MIGRATE_UNSAFE |
                 Sys::Virt::Domain::MIGRATE_PERSIST_DEST;

  my $persist_xml = "/tmp/persist_tck.xml";

  my %params = {Sys::Virt::Domain::MIGRATE_PARAM_PERSIST_XML=>$persist_xml};
  ok_domain(sub { $srcvm = $conn->define_domain($xml) }, "defined initial domain");
  lives_ok(sub { $srcvm->create() } , "started initial domain");

  lives_ok(sub { $srcvm->migrate($otherconn, \%params, $migflags); $failed = 0;}, "migrated domain");

  my $srcvm = $conn->get_domain_by_name("tck");
  ok(!$srcvm->is_active, "source VM is not still active");
  ok($srcvm->is_persistent, "source VM config still exists");
  lives_ok(sub { $dstvm = $otherconn->get_domain_by_name("tck")}, "target VM exists");
  ok($dstvm->is_active, "target VM is running");

Note: '/tmp/persist_tck.xml' has vcpu 4 configured which is different from vcpu 1 in the default xml.

2. Configure the NFS on both hosts and run the script
# libvirt-tck --testdir persist_xml_migration_new.t -v --force

ok 1 - defined initial domain
ok 2 - started initial domain
ok 3 - migrated domain
ok 4 - source VM is not still active
ok 5 - source VM config still exists
ok 6 - target VM exists
ok 7 - target VM is running

# Please destroy guest on target and check the xml is updated with specified xml.

3. When the guest running on target machine, execute dumpxml on target machine
# virsh dumpxml tck |grep vcpu -A3
<vcpu placement='static'>1</vcpu>
4. Destroy the guest on target host and the XML should be same as specified by /tmp/persist_tck.xml
# virsh destroy tck
# virsh dumpxml tck |grep vcpu -A3
<vcpu placement='static'>1</vcpu>             <==== This is wrong, should be 4


Actual results:
See above

Expected results:
The xml specified by MIGRATE_PARAM_PERSIST_XML should take effect

Additional info: