From 3909c2de5f181bb15cad7b225697f87a6df5731a Mon Sep 17 00:00:00 2001 From: minima Date: Sat, 12 Mar 2005 11:37:55 +0000 Subject: [PATCH] fix error on anonymous pc17 --- perl/DXProt.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl/DXProt.pm b/perl/DXProt.pm index dd532375..8e8dfea7 100644 --- a/perl/DXProt.pm +++ b/perl/DXProt.pm @@ -854,7 +854,7 @@ sub handle_17 } $uref = Route->new($ucall) unless $uref; # throw away - $self->route_pc17($origin, $line, $parent, $uref) if (DXChannel::get($parent->call) || $parent->np); + $self->route_pc17($origin, $line, $parent, $uref) if (DXChannel::get($parent->call) || ($parent->isa('Route::Node') && $parent->np)); } # link request -- 2.43.0