From 395ac7aa91f571981cf20d5434ce3b13e1b65bcf Mon Sep 17 00:00:00 2001 From: minima Date: Wed, 11 Jan 2006 22:03:53 +0000 Subject: [PATCH] fix return pings --- perl/DXXml/Ping.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/perl/DXXml/Ping.pm b/perl/DXXml/Ping.pm index a9d72083..f2620e6b 100644 --- a/perl/DXXml/Ping.pm +++ b/perl/DXXml/Ping.pm @@ -37,6 +37,7 @@ sub handle_input oid=>$self->{id}, ot=>$self->{t} ); + $dxchan->send($rep->toxml); } else { handle_ping_reply($dxchan, $self->{o}, $self->{ot}, $self->{oid}); } -- 2.43.0