From a2501aa043b55e227918e4b5b0631a4b0bf65665 Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Wed, 9 Mar 2005 10:30:19 +0000
Subject: [PATCH] make sure external origin is preserved on reply

---
 perl/Thingy/Ping.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/perl/Thingy/Ping.pm b/perl/Thingy/Ping.pm
index d87ad456..02fc5cef 100644
--- a/perl/Thingy/Ping.pm
+++ b/perl/Thingy/Ping.pm
@@ -96,6 +96,7 @@ sub handle
 			my $repthing = $thing->new_reply;
 			$repthing->{out} = 0;
 			$repthing->{id} = $thing->{id};
+			$repthing->{o} = $thing->{o} if $thing->{o};
 			$repthing->send($dxchan) if $repthing;
 		} else {
 
-- 
2.34.1