X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fcluster.pl;h=d3b24ba9838740fde1d5014a0859f56bcfc69970;hb=4a134278a40e451ff1769c7b98d1a4f709a6b828;hp=6bd0c7440aeb1f0a9556bfdc0e7c4d2ba690a2e0;hpb=2090157518d0d2da860345507680f4ad91b043a2;p=spider.git

diff --git a/perl/cluster.pl b/perl/cluster.pl
index 6bd0c744..d3b24ba9 100755
--- a/perl/cluster.pl
+++ b/perl/cluster.pl
@@ -147,7 +147,7 @@ use DXXml;
 use DXSql;
 use IsoTime;
 use BPQMsg;
-
+use RBN;
 
 
 use Data::Dumper;
@@ -349,7 +349,9 @@ sub new_channel
 		
 		$user->startt($systime); # mark the start time of this connection
 		if ($user->is_node) {
-			$dxchan = DXProt->new($call, $conn, $user);
+			$dxchan = DXProt->new($call, $conn, $user);	
+		} elsif ($user->is_rbn) {
+			$dxchan = RBN->new($newcall, $conn, $user);
 		} elsif ($user->is_user) {
 			$dxchan = DXCommandmode->new($newcall, $conn, $user);
 		} else {