From: Dirk Koopman <djk@tobit.co.uk>
Date: Wed, 11 Jan 2023 17:47:58 +0000 (+0000)
Subject: remove uninitialised warnings in DXProtHandle.pm
X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=fa226048f56571a9d1b88f261b1d26b4cd596a49;p=spider.git

remove uninitialised warnings in DXProtHandle.pm
---

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