From d24f05ab0fb916b36d783894f1271a4609697e55 Mon Sep 17 00:00:00 2001
From: minima <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.34.1