From: minima Date: Fri, 2 Mar 2001 17:16:42 +0000 (+0000) Subject: altered order of a couple of statements X-Git-Tag: R_1_47~168 X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=commitdiff_plain;h=6616898c4373267522bcacca20e58157bd5a538b;p=spider.git altered order of a couple of statements --- 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 {