From 8eb73377c159d7c3614e9faf0392e0350474e307 Mon Sep 17 00:00:00 2001 From: Thomas Lamprecht Date: Wed, 3 Nov 2021 16:18:00 +0100 Subject: [PATCH] kvm_user_version: add explicit return statement while perl returns the (scalar) result of the last expression automatically its still nicer to explicitly do so.. Signed-off-by: Thomas Lamprecht --- PVE/QemuServer.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/PVE/QemuServer.pm b/PVE/QemuServer.pm index e0a89aa..afe4878 100644 --- a/PVE/QemuServer.pm +++ b/PVE/QemuServer.pm @@ -1235,7 +1235,7 @@ sub kvm_user_version { my sub extract_version { my ($machine_type, $version) = @_; $version = kvm_user_version() if !defined($version); - PVE::QemuServer::Machine::extract_version($machine_type, $version) + return PVE::QemuServer::Machine::extract_version($machine_type, $version) } sub kernel_has_vhost_net { -- 2.39.2