From d64ee87e738d8a5d07278385527ba392343607c2 Mon Sep 17 00:00:00 2001 From: Alexandre Derumier Date: Sun, 17 Mar 2013 16:09:02 +0100 Subject: [PATCH] qmpclient-qga : add qga option at object creation Signed-off-by: Alexandre Derumier --- PVE/QMPClient.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/PVE/QMPClient.pm b/PVE/QMPClient.pm index 4e244199..5022b825 100755 --- a/PVE/QMPClient.pm +++ b/PVE/QMPClient.pm @@ -20,7 +20,7 @@ use Data::Dumper; # Note: kvm can onyl handle 1 connection, so we close connections asap sub new { - my ($class, $eventcb) = @_; + my ($class, $eventcb, $qga) = @_; my $mux = new IO::Multiplex; @@ -34,6 +34,7 @@ sub new { }, $class; $self->{eventcb} = $eventcb if $eventcb; + $self->{qga} = $qga if $qga; $mux->set_callback_object($self); -- 2.39.5