From 5aaaa0212b6bda5def233ffce515d889b8e547e7 Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Tue, 22 Feb 2005 21:28:03 +0000
Subject: [PATCH] fix missing under test

---
 perl/DXProt.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 4b34975c..612e59b6 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -1049,7 +1049,7 @@ sub handle_19
 		my $flags = Route::here($here)|Route::conf($conf);
 
 		# is he under the control of the new protocol?
-		if ($r->np) {
+		if ($r && $r->np) {
 			dbg("PCPROT: $call aranea node, ignored") if isdbg('chanerr');
 			next;
 		}
-- 
2.34.1