--- Begin Message ---
Signed-off-by: Alexandre Derumier <alexandre.derum...@groupe-cyllene.com>
---
src/PVE/QemuServer/Blockdev.pm | 7 +++----
1 file changed, 3 insertions(+), 4 deletions(-)
diff --git a/src/PVE/QemuServer/Blockdev.pm b/src/PVE/QemuServer/Blockdev.pm
index dd975e3c..73eb7c1e 100644
--- a/src/PVE/QemuServer/Blockdev.pm
+++ b/src/PVE/QemuServer/Blockdev.pm
@@ -367,9 +367,8 @@ my sub generate_format_blockdev {
return $blockdev;
}
-my sub generate_backing_blockdev;
-
-sub generate_backing_blockdev {
+my sub generate_backing_blockdev {
+ use feature 'current_sub';
my ($storecfg, $snapshots, $deviceid, $drive, $machine_version, $options)
= @_;
my $snap_id = $options->{'snapshot-name'};
@@ -386,7 +385,7 @@ sub generate_backing_blockdev {
if ($parentid) {
my $options = { 'snapshot-name' => $parentid };
- $snap_fmt_blockdev->{backing} = generate_backing_blockdev(
+ $snap_fmt_blockdev->{backing} = __SUB__->(
$storecfg, $snapshots, $deviceid, $drive, $machine_version,
$options,
);
}
--
2.39.5
--- End Message ---
_______________________________________________
pve-devel mailing list
pve-devel@lists.proxmox.com
https://lists.proxmox.com/cgi-bin/mailman/listinfo/pve-devel
