diff --git a/debian/changelog b/debian/changelog index 60065a9..92b8bc3 100644 --- a/debian/changelog +++ b/debian/changelog @@ -1,4 +1,4 @@ -vn-vmware (1.1.0) stable; urgency=low +vn-vmware (1.1.1) stable; urgency=low * Initial Release. diff --git a/vn-vmware.pl b/vn-vmware.pl index d266467..9f6d9f2 100755 --- a/vn-vmware.pl +++ b/vn-vmware.pl @@ -590,21 +590,12 @@ sub clone_machine { ); if ($original_vm) { - if (not($overwrite)) { + if ($overwrite ne true) { die "Machine with same name exists."; } $dst_tmp_name = "$dst_name.tmp"; log_message "Machine '$dst_name' already exists, cloning to '$dst_tmp_name'."; - - my $tmp_vm = Vim::find_entity_view( - view_type => 'VirtualMachine', - filter => {'name' => $dst_tmp_name} - ); - - if ($tmp_vm) { - destroy_machine($tmp_vm); - } } # If MAC is not especified, it is generated by VMWare @@ -761,7 +752,7 @@ sub clone_machine { ); $vm_clone->ReconfigVM(spec => $change_spec); - if ($original_vm && $overwrite) { + if ($original_vm) { destroy_machine($original_vm); log_message "Renaming '$dst_tmp_name' to '$dst_name'.";