From db104460647dc14d0d720568d555b090ef76deff Mon Sep 17 00:00:00 2001
From: Maxime Besson <maxime.besson@worteks.com>
Date: Wed, 7 Apr 2021 17:01:55 +0200
Subject: [PATCH] Handle UTF-8 locales in addTrEntry

---
 scripts/addTrEntry | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/scripts/addTrEntry b/scripts/addTrEntry
index 8ea042491..3cb2810e7 100755
--- a/scripts/addTrEntry
+++ b/scripts/addTrEntry
@@ -3,10 +3,12 @@
 use strict;
 use JSON;
 use Getopt::Long;
+use Encode::Locale qw/decode_argv/;
 my ( $portal, $modify, $help, $delete, $reorder );
 my $json =
   JSON->new->utf8->pretty()->canonical()->space_before(0)->space_after(0);
 
+decode_argv();
 GetOptions(
     "portal|p"  => \$portal,
     "modify|m"  => \$modify,