X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProtHandle.pm;h=0beabcf224b11d3697bfe76f4d86bab5aa1d1a22;hb=c480ac94da7dbd5762fcd15aa556c874d223e14e;hp=0f7a1ff381c08c409a9c98eec162ca1908076ceb;hpb=172430f1a1a4b0ff593f5750e1e93c6c62a3ec76;p=spider.git diff --git a/perl/DXProtHandle.pm b/perl/DXProtHandle.pm index 0f7a1ff3..0beabcf2 100644 --- a/perl/DXProtHandle.pm +++ b/perl/DXProtHandle.pm @@ -2016,7 +2016,7 @@ sub handle_93 if (isdbg('progress')) { my $vs = $via ne '*' ? " via $via" : ''; - my $s = "ANNTALK: $from\@$onode$via -> $to '$text'"; + my $s = "ANNTALK: $from\@$onode$vs -> $to '$text'"; dbg($s); }