improve talk logging to show orig or dest node.

[spider.git] / perl / DXProt.pm

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 0cf46bb9ce3a2f425f67cca568ae0131778eb464..90ac30f026379646a03bd3500f475b27a881b860 100644 (file)
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -1170,7 +1170,7 @@ sub talk
        } else {
                $self->send(pc10($from, $to, $via, $line, $origin));
        }
-       Log('talk', $to, $from, $via?$via:$self->call, $line) unless $origin && $origin ne $main::mycall;
+       Log('talk', $to, $from, '>' . ($via || $origin || $self->call), $line) unless $origin && $origin ne $main::mycall;
 }
 
 # send it if it isn't the except list and isn't isolated and still has a hop count