From 285aa72688eedd0db1ffeeb3eeef05d225dac8d8 Mon Sep 17 00:00:00 2001
From: "E. Choroba" <choroba@matfyz.cz>
Date: Wed, 26 Jun 2024 10:00:10 -0700
Subject: [PATCH] Supress redefined warnings

---
 tred_refactored/tredlib/TrEd/Macros.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/tred_refactored/tredlib/TrEd/Macros.pm b/tred_refactored/tredlib/TrEd/Macros.pm
index dce22cc21..4e811291f 100644
--- a/tred_refactored/tredlib/TrEd/Macros.pm
+++ b/tred_refactored/tredlib/TrEd/Macros.pm
@@ -929,7 +929,8 @@ sub initialize_macros {
         my $utf = ($useEncoding) ? "use utf8;\n" : q{};
         my $macros = q{};
         $macros .= 'use strict;' if $strict;
-        $macros .= "use warnings; no warnings 'redefine';" if $warnings;
+        $macros .= 'use warnings;' if $warnings;
+        $macros .= 'no warnings "redefine";';
         $macros
             .= "{\n" 
             . $utf