+ }
+
+ # set up the basic channel info - this needs a bit more thought - there is duplication here
+ if (!defined $dxchan) {
+ my ($sort, $call, $line) = $msg =~ /^(\w)(\S+)\|(.*)$/;
+ my $user = DXUser->get($call);
+ $user = DXUser->new($call) if !defined $user;
+ $user->sort('U') if (!$user->sort());
+ my $sort = $user->sort();
+ $dxchan = DXCommandmode->new($call, $conn, $user) if ($sort eq 'U');
+ $dxchan = DXProt->new($call, $conn, $user) if ($sort eq 'A');
+ die "Invalid sort of user on $call = $sort" if !$dxchan;
+ }
+
+ # queue the message and the channel object for later processing