X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fconsole.pl;h=5639488874e573231c748c1824b00185e548e8b3;hb=c32a58cabf09c72dd08efca7ff5c49a0adfce71e;hp=ea46553f39acce2122c0f103f3a038e9c815f5cf;hpb=16c932699e360cd44811afc68894e55a1a128962;p=spider.git diff --git a/perl/console.pl b/perl/console.pl index ea46553f..56394888 100755 --- a/perl/console.pl +++ b/perl/console.pl @@ -526,7 +526,7 @@ $Text::Wrap::Columns = $cols; my $lastmin = 0; -$conn = IntMsg->connect($clusteraddr, $clusterport, \&rec_socket); +$conn = IntMsg->connect($clusteraddr, $clusterport, rproc => \&rec_socket); $conn->{on_connect} = \&on_connect; $conn->{on_disconnect} = \&on_disconnect;