From 4f0fa78eb7cb88eab411bb5630a2f33514a74a20 Mon Sep 17 00:00:00 2001
From: Dirk Koopman <djk@tobit.co.uk>
Date: Fri, 24 Apr 2020 13:52:14 +0100
Subject: [PATCH] add "progress" to pc93 messages

---
 perl/DXProtHandle.pm | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/perl/DXProtHandle.pm b/perl/DXProtHandle.pm
index fdc0b054..4e3480d6 100644
--- a/perl/DXProtHandle.pm
+++ b/perl/DXProtHandle.pm
@@ -2012,6 +2012,11 @@ sub handle_93
 		return;
 	}
 
+	if (isdbg('progress')) {
+		my $s = sprintf "ANNTALK: to: $to from: $from\@$onode%s '$text'", $via ne '*'?" via $via":'';
+		dbg($s);
+	}
+	
 	# will we allow it at all?
 	if ($censorpc) {
 		my @bad;
-- 
2.34.1