move_vm: add original disk as unusedX

This commit is contained in:
Dietmar Maurer 2013-05-29 12:15:30 +02:00
parent e2cd75fa65
commit 635c3c4426

View File

@ -2099,7 +2099,7 @@ __PACKAGE__->register_method({
enum => [ PVE::QemuServer::disknames() ], enum => [ PVE::QemuServer::disknames() ],
}, },
storage => get_standard_option('pve-storage-id', { description => "Target Storage." }), storage => get_standard_option('pve-storage-id', { description => "Target Storage." }),
format => { 'format' => {
type => 'string', type => 'string',
description => "Target Format.", description => "Target Format.",
enum => [ 'raw', 'qcow2', 'vmdk' ], enum => [ 'raw', 'qcow2', 'vmdk' ],
@ -2180,6 +2180,8 @@ __PACKAGE__->register_method({
$conf->{$disk} = PVE::QemuServer::print_drive($vmid, $newdrive); $conf->{$disk} = PVE::QemuServer::print_drive($vmid, $newdrive);
PVE::QemuServer::add_unused_volume($conf, $volid);
PVE::QemuServer::update_config_nolock($vmid, $conf, 1); PVE::QemuServer::update_config_nolock($vmid, $conf, 1);
}; };
if (my $err = $@) { if (my $err = $@) {