Error logging fixes
gitea/vn-vmware/pipeline/head This commit looks good Details

This commit is contained in:
Juan Ferrer 2022-01-10 10:48:28 +01:00
parent 61d11901f5
commit 7e8b47b4eb
2 changed files with 10 additions and 1 deletions

2
debian/changelog vendored
View File

@ -1,4 +1,4 @@
vn-vmware (1.1.30) stable; urgency=low vn-vmware (1.1.31) stable; urgency=low
* Initial Release. * Initial Release.

View File

@ -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,