From: minima <minima>
Date: Fri, 2 Mar 2001 23:07:59 +0000 (+0000)
Subject: slight syntax change
X-Git-Tag: R_1_47~163
X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=8cf5b21b8c40d97b30a0f605247bc65210df734f;p=spider.git

slight syntax change
---

diff --git a/perl/Msg.pm b/perl/Msg.pm
index fd6e3b17..7af8566e 100644
--- a/perl/Msg.pm
+++ b/perl/Msg.pm
@@ -119,7 +119,7 @@ sub _send {
     my ($conn, $flush) = @_;
     my $sock = $conn->{sock};
     return unless defined($sock);
-    my ($rq) = $conn->{outqueue};
+    my $rq = $conn->{outqueue};
 
     # If $flush is set, set the socket to blocking, and send all
     # messages in the queue - return only if there's an error