# do routing stuff
my $node = Route::Node::get($call);
- my @rout = $node->del_nodes; # at the next level
-
- @rout = $node->del($main::routeroot) if $node;
+ my @rout;
+ if ($node) {
+ @rout = $node->del_nodes; # at the next level
+ @rout = $node->del($main::routeroot);
+ }
# unbusy and stop and outgoing mail
my $mref = DXMsg::get_busy($call);
if ($self->{routefilter}) {
for (; @_ && $no; $no--) {
my $r = shift;
- ($filter, $hops) = $self->{routefilter}->it($self->{call}, $self->{dxcc}, $self->{itu}, $self->{cq}, $r->call, $r->dxcc, $r->itu, $r->cq);
- push @rin, $r if $filter;
+ if ($r) {
+ ($filter, $hops) = $self->{routefilter}->it($self->{call}, $self->{dxcc}, $self->{itu}, $self->{cq}, $r->call, $r->dxcc, $r->itu, $r->cq);
+ push @rin, $r if $filter;
+ } else {
+ dbg('chan', "was sent a null value");
+ }
}
}
if (@rin) {