pass snapname to vdisk_clone and plugin clone_image

Signed-off-by: Stefan Priebe <s.priebe@profihost.ag>

diff --git a/PVE/Storage.pm b/PVE/Storage.pm
index da64e892f602573331fb6ce126562f3162681230..3cc9581dfa8f68470c46ff22b33d128a01f55921 100755 (executable)
--- a/PVE/Storage.pm
+++ b/PVE/Storage.pm
@@ -478,7 +478,7 @@ sub storage_migrate {
 }
 
 sub vdisk_clone {
-    my ($cfg, $volid, $vmid) = @_;
+    my ($cfg, $volid, $vmid, $snap) = @_;
 
     my ($storeid, $volname) = parse_volume_id($volid);
 
@@ -490,7 +490,7 @@ sub vdisk_clone {
 
     # lock shared storage
     return $plugin->cluster_lock_storage($storeid, $scfg->{shared}, undef, sub {
-       my $volname = $plugin->clone_image($scfg, $storeid, $volname, $vmid);
+       my $volname = $plugin->clone_image($scfg, $storeid, $volname, $vmid, $snap);
        return "$storeid:$volname";
     });
 }