From e4c016351a2e807c569c4706f778298529b16761 Mon Sep 17 00:00:00 2001 From: Dietmar Maurer Date: Fri, 8 Jun 2018 07:06:37 +0200 Subject: [PATCH] lxc enter: use IO::Select->select --- PVE/APIClient/Commands/lxc.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/PVE/APIClient/Commands/lxc.pm b/PVE/APIClient/Commands/lxc.pm index f0c85f7..c092028 100644 --- a/PVE/APIClient/Commands/lxc.pm +++ b/PVE/APIClient/Commands/lxc.pm @@ -277,10 +277,10 @@ __PACKAGE__->register_method ({ }; while (1) { - while(my @ready = $select->can_read(3)) { + while(my ($readable) = IO::Select->select($select, undef, undef, 3)) { $check_terminal_size->() if $winch_received; - foreach my $fh (@ready) { + foreach my $fh (@$readable) { if ($fh == $web_socket) { # Read from WebSocket -- 2.39.2