From 974132fc71b24d52a34484178d22b97c5ccecef9 Mon Sep 17 00:00:00 2001 From: minima Date: Mon, 27 Nov 2000 09:45:43 +0000 Subject: [PATCH] some cosmetic changes to error messages on pc16/19 --- perl/DXProt.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/perl/DXProt.pm b/perl/DXProt.pm index 03253bf0..da138878 100644 --- a/perl/DXProt.pm +++ b/perl/DXProt.pm @@ -539,7 +539,7 @@ sub normal dbg('chan', "LOOP: $call is a node"); next; } - my $rcall = $ref->call; + my $rcall = $ref->mynode->call; dbg('chan', "LOOP: already have $call on $rcall"); next; } @@ -644,7 +644,8 @@ sub normal dbg('chan', "LOOP: $call come in on wrong channel"); next; } - dbg('chan', "already have $call"); + my $rcall = $node->mynode->call; + dbg('chan', "already have $call on $rcall"); next; } -- 2.43.0