mirror of
https://git.proxmox.com/git/qemu-server
synced 2025-08-06 04:16:59 +00:00
do not delete unmatched content from $$input
This commit is contained in:
parent
194d171e6c
commit
f4fde4d376
@ -259,12 +259,9 @@ sub queue_execute {
|
|||||||
sub mux_input {
|
sub mux_input {
|
||||||
my ($self, $mux, $fh, $input) = @_;
|
my ($self, $mux, $fh, $input) = @_;
|
||||||
|
|
||||||
return if $$input !~ m/}\r\n$/;
|
return if $$input !~ s/^(.*})\r\n(.*)$/$2/so;
|
||||||
|
|
||||||
my $raw = $$input;
|
my $raw = $1;
|
||||||
|
|
||||||
# Remove the input from the input buffer.
|
|
||||||
$$input = '';
|
|
||||||
|
|
||||||
my $vmid = $self->{fhs_lookup}->{$fh};
|
my $vmid = $self->{fhs_lookup}->{$fh};
|
||||||
if (!$vmid) {
|
if (!$vmid) {
|
||||||
|
Loading…
Reference in New Issue
Block a user