X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FAMsg.pm;h=4738403a5bf2d2b1f6aee333ac8709ce3c1208c5;hb=2d1175b409d790f991091e8f2884d26591021b9a;hp=4ca43cb495951433f88cf4e325f548e9d3d7e037;hpb=c3c15883cf25add24fc49e32eb0d17dce6839a62;p=spider.git diff --git a/perl/AMsg.pm b/perl/AMsg.pm index 4ca43cb4..4738403a 100644 --- a/perl/AMsg.pm +++ b/perl/AMsg.pm @@ -126,7 +126,6 @@ sub new_client { $conn->{outbound} = 0; $conn->{state} = 'WH'; # wait for return authorize my $thing = $conn->{lastthing} = Thingy::Hello->new(); - $thing->send($conn, 'Aranea'); dbg("-> D $conn->{peerhost} $thing->{Aranea}") if isdbg('chan'); }