X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProtHandle.pm;h=256f296774653c9246857a3de043af4f70cb98b9;hb=5d1d9d0ed0577e2459108dba8c82ab3ed591da10;hp=5189746aa5ba35f28e62f649c686618f6720d68b;hpb=d1d0a158e45ea7dba36caa70822d22bff7a9a00b;p=spider.git

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
 			}