From 6616898c4373267522bcacca20e58157bd5a538b Mon Sep 17 00:00:00 2001 From: minima Date: Fri, 2 Mar 2001 17:16:42 +0000 Subject: [PATCH] altered order of a couple of statements --- perl/Msg.pm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/perl/Msg.pm b/perl/Msg.pm index 74c64ec7..02795812 100644 --- a/perl/Msg.pm +++ b/perl/Msg.pm @@ -244,9 +244,8 @@ sub _rcv { # Complement to _send if ($bytes_read > 0) { if ($msg =~ /\n/) { @lines = split /\r?\n/, $msg; - push @lines, ' ' unless @lines; - $lines[0] = $conn->{msg} . $lines[0] if exists $conn->{msg}; + push @lines, ' ' unless @lines; if ($msg =~ /\n$/) { delete $conn->{msg}; } else { -- 2.34.1