From: Timo Sirainen <timo.sirainen@open-xchange.com>
Date: Fri, 19 May 2023 13:58:51 +0000 (+0300)
Subject: config: settings-get.pl - Fix to work with "use warnings"
X-Git-Tag: 2.4.0~2012
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=df26e1ea21e571fa76b7b947781fe7e2c8c20152;p=thirdparty%2Fdovecot%2Fcore.git

config: settings-get.pl - Fix to work with "use warnings"
---

diff --git a/src/config/settings-get.pl b/src/config/settings-get.pl
index 91d3524421..f275c9a278 100755
--- a/src/config/settings-get.pl
+++ b/src/config/settings-get.pl
@@ -1,5 +1,6 @@
 #!/usr/bin/env perl
 use strict;
+use warnings;
 
 print "/* WARNING: THIS FILE IS GENERATED - DO NOT PATCH!\n";
 print "   It's not enough alone in any case, because the defaults may be\n";
@@ -28,9 +29,9 @@ print '#include <unistd.h>'."\n";
 print '#define CONFIG_BINARY'."\n";
 
 my @services = ();
-my %service_defaults = {};
+my %service_defaults = ();
 my @service_ifdefs = ();
-my %parsers = {};
+my %parsers = ();
 
 my $linked_file = 0;
 foreach my $file (@ARGV) {