X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXDb.pm;h=833640f5862b2d5dfa75a7b1666a35e53336ab6e;hb=8bdb2c82158893b5fdddb7a88f83375411f99679;hp=a088866c5873e675586b4a72c8c93c6565170e70;hpb=2ffd50e69be8f5e17e8ac3f8735139af7316195a;p=spider.git diff --git a/perl/DXDb.pm b/perl/DXDb.pm index a088866c..833640f5 100644 --- a/perl/DXDb.pm +++ b/perl/DXDb.pm @@ -277,7 +277,7 @@ sub handle_45 # incoming DB Information my $n = getstream($_[3]); if ($n) { - my $mchan = DXChannel->get($n->{call}); + my $mchan = DXChannel::get($n->{call}); $mchan->send($_[2] . ":$_[4]") if $mchan; } }