PCI: use warnings/strict and fix setting $vga from config2command

fixes commit 74c17b7a23c8a953d1dcec9bd53449d71d88cd5d which moved
this code here, but forgot to pass $vga ref, as the module was not
using warning nor strict mode this was not caught..

Signed-off-by: Thomas Lamprecht <t.lamprecht@proxmox.com>

diff --git a/PVE/QemuServer.pm b/PVE/QemuServer.pm
index 418a2a0f03448182cd75d7225d3dd1f528cf31b4..3be7e240276bc138b8d6cd50a2726ca860b23117 100644 (file)
--- a/PVE/QemuServer.pm
+++ b/PVE/QemuServer.pm
@@ -3214,7 +3214,7 @@ sub config_to_command {
 
     # host pci device passthrough
     my ($kvm_off, $gpu_passthrough, $legacy_igd) = PVE::QemuServer::PCI::print_hostpci_devices(
-       $vmid, $conf, $devices, $winversion, $q35, $bridges, $arch, $machine_type, $bootorder);
+       $vmid, $conf, $devices, $vga, $winversion, $q35, $bridges, $arch, $machine_type, $bootorder);
 
     # usb devices
     my $usb_dev_features = {};

diff --git a/PVE/QemuServer/PCI.pm b/PVE/QemuServer/PCI.pm
index 92adb90d4a2ea756f0a96c0d89c6ceea10d0c032..2ee142fc3997a2da9c090bd18dc633ff50ab3ad4 100644 (file)
--- a/PVE/QemuServer/PCI.pm
+++ b/PVE/QemuServer/PCI.pm
@@ -1,5 +1,8 @@
 package PVE::QemuServer::PCI;
 
+use warnings;
+use strict;
+
 use PVE::JSONSchema;
 use PVE::SysFSTools;
 
@@ -357,7 +360,7 @@ sub parse_hostpci {
 }
 
 sub print_hostpci_devices {
-    my ($vmid, $conf, $devices, $winversion, $q35, $bridges, $arch, $machine_type, $bootorder) = @_;
+    my ($vmid, $conf, $devices, $vga, $winversion, $q35, $bridges, $arch, $machine_type, $bootorder) = @_;
 
     my $kvm_off = 0;
     my $gpu_passthrough = 0;