mirror of
git://git.proxmox.com/git/qemu-server.git
synced 2025-02-12 21:57:58 +03:00
clone: use a fullclone hash instead of $drive->{full}
'full' is not a valid drive property which are now being checked in print_property_string. Since it's only a temporary value and passed to clone_disk as parameter it can be stored separately.
This commit is contained in:
parent
db0c359491
commit
34456bf02e
@ -2191,6 +2191,7 @@ __PACKAGE__->register_method({
|
||||
|
||||
my $newconf = { lock => 'clone' };
|
||||
my $drives = {};
|
||||
my $fullclone = {};
|
||||
my $vollist = [];
|
||||
|
||||
foreach my $opt (keys %$oldconf) {
|
||||
@ -2217,7 +2218,7 @@ __PACKAGE__->register_method({
|
||||
if ($param->{full}) {
|
||||
die "Full clone feature is not available"
|
||||
if !PVE::Storage::volume_has_feature($storecfg, 'copy', $drive->{file}, $snapname, $running);
|
||||
$drive->{full} = 1;
|
||||
$fullclone->{$opt} = 1;
|
||||
} else {
|
||||
# not full means clone instead of copy
|
||||
die "Linked clone feature is not available"
|
||||
@ -2273,7 +2274,7 @@ __PACKAGE__->register_method({
|
||||
my $drive = $drives->{$opt};
|
||||
|
||||
my $newdrive = PVE::QemuServer::clone_disk($storecfg, $vmid, $running, $opt, $drive, $snapname,
|
||||
$newid, $storage, $format, $drive->{full}, $newvollist);
|
||||
$newid, $storage, $format, $fullclone->{$opt}, $newvollist);
|
||||
|
||||
$newconf->{$opt} = PVE::QemuServer::print_drive($vmid, $newdrive);
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user