From 006d442ffc3458482d0d41b94cdfb1f458aaa003 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jan=20=C5=A0t=C4=9Bp=C3=A1nek?= <jan.stepanek@matfyz.cz>
Date: Wed, 24 Jul 2024 20:41:34 +0200
Subject: [PATCH] Suppress 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