From 5d1d9d0ed0577e2459108dba8c82ab3ed591da10 Mon Sep 17 00:00:00 2001 From: Dirk Koopman Date: Thu, 12 Jan 2023 17:09:03 +0000 Subject: [PATCH] replace missing $key in pc11 INPUT dbg line --- perl/DXProtHandle.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl/DXProtHandle.pm b/perl/DXProtHandle.pm index 5189746a..256f2967 100644 --- a/perl/DXProtHandle.pm +++ b/perl/DXProtHandle.pm @@ -288,7 +288,7 @@ sub handle_11 } if ($pc11_saved{$key}) { - dbg("DUPE $pc->[0] $self->{call } key: is saved, ignored") if isdbg("pc11"); + dbg("DUPE $pc->[0] $self->{call } key: $key is saved, ignored") if isdbg("pc11"); return; # because it's a dup } -- 2.43.0