From fa226048f56571a9d1b88f261b1d26b4cd596a49 Mon Sep 17 00:00:00 2001
From: Dirk Koopman <djk@tobit.co.uk>
Date: Wed, 11 Jan 2023 17:47:58 +0000
Subject: [PATCH] remove uninitialised warnings in DXProtHandle.pm

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

diff --git a/perl/DXProtHandle.pm b/perl/DXProtHandle.pm
index f3c0f6ae..49c54734 100644
--- a/perl/DXProtHandle.pm
+++ b/perl/DXProtHandle.pm
@@ -36,6 +36,9 @@ use DXCIDR;
 
 use strict;
 use warnings qw(all);
+no warnings qw(uninitialized);
+
+
 
 use vars qw($pc11_max_age $pc23_max_age $last_pc50 $eph_restime $eph_info_restime $eph_pc34_restime
 			$last_hour $last10 %eph  %pings %rcmds $ann_to_talk
-- 
2.34.1