do non blocking connects

[spider.git] / perl / DXProt.pm

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 516779b67458791266a7d00bd25453d30732b1ad..fd47a28a2860afa87f393bc2bc4e309793076272 100644 (file)
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -1148,7 +1148,6 @@ sub finish
 {
        my $self = shift;
        my $call = $self->call;
-       my $conn = shift;
        my $ref = DXCluster->get_exact($call);
        
        # unbusy and stop and outgoing mail