From 258e646c577dffc56576e11ae0f1b0c982ef92d0 Mon Sep 17 00:00:00 2001
From: Stefan Priebe <s.priebe@profihost.ag>
Date: Fri, 4 Jul 2014 10:25:47 +0200
Subject: [PATCH] pass snapname to PVE::Storage::vdisk_clone

Signed-off-by: Stefan Priebe <s.priebe@profihost.ag>
---
 PVE/QemuServer.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/PVE/QemuServer.pm b/PVE/QemuServer.pm
index abed0c1d..db0e2069 100644
--- a/PVE/QemuServer.pm
+++ b/PVE/QemuServer.pm
@@ -5190,7 +5190,7 @@ sub clone_disk {
 
     if (!$full) {
 	print "create linked clone of drive $drivename ($drive->{file})\n";
-	$newvolid = PVE::Storage::vdisk_clone($storecfg,  $drive->{file}, $newvmid);
+	$newvolid = PVE::Storage::vdisk_clone($storecfg,  $drive->{file}, $newvmid, $snapname);
 	push @$newvollist, $newvolid;
     } else {
 	my ($storeid, $volname) = PVE::Storage::parse_volume_id($drive->{file});