Error logging fixes
gitea/vn-vmware/pipeline/head This commit looks good
Details
gitea/vn-vmware/pipeline/head This commit looks good
Details
This commit is contained in:
parent
61d11901f5
commit
7e8b47b4eb
|
@ -1,4 +1,4 @@
|
||||||
vn-vmware (1.1.30) stable; urgency=low
|
vn-vmware (1.1.31) stable; urgency=low
|
||||||
|
|
||||||
* Initial Release.
|
* Initial Release.
|
||||||
|
|
||||||
|
|
|
@ -1026,6 +1026,10 @@ sub clone_machine {
|
||||||
view_type => 'HostSystem',
|
view_type => 'HostSystem',
|
||||||
filter => {'name' => $dst_host}
|
filter => {'name' => $dst_host}
|
||||||
);
|
);
|
||||||
|
|
||||||
|
unless ($host_view) {
|
||||||
|
die "Host '$dst_host' not found in cluster.";
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
my $comp_res_view = Vim::get_view(mo_ref => $host_view->parent);
|
my $comp_res_view = Vim::get_view(mo_ref => $host_view->parent);
|
||||||
|
@ -1036,6 +1040,11 @@ sub clone_machine {
|
||||||
filter => {'name' => $dst_datastore},
|
filter => {'name' => $dst_datastore},
|
||||||
properties => ['name']
|
properties => ['name']
|
||||||
);
|
);
|
||||||
|
|
||||||
|
unless ($ds_new) {
|
||||||
|
die "Datastore '$dst_datastore' not found.";
|
||||||
|
}
|
||||||
|
|
||||||
$relocate_spec = VirtualMachineRelocateSpec->new(
|
$relocate_spec = VirtualMachineRelocateSpec->new(
|
||||||
pool => $comp_res_view->resourcePool,
|
pool => $comp_res_view->resourcePool,
|
||||||
host => $host_view,
|
host => $host_view,
|
||||||
|
|
Reference in New Issue