From 99ea4bbd2ac39f6595fc6420e6117fe90a57cee6 Mon Sep 17 00:00:00 2001
From: Guillaume Rousse <guillaume.rousse@renater.fr>
Date: Mon, 3 Sep 2018 15:41:12 +0200
Subject: [PATCH] use stricter output discipline

---
 lib/AccountManager/App.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/AccountManager/App.pm b/lib/AccountManager/App.pm
index 4cd6fda..b3fc263 100644
--- a/lib/AccountManager/App.pm
+++ b/lib/AccountManager/App.pm
@@ -194,7 +194,7 @@ sub respond {
 
     $self->{logger}->debug("Responding with template '$in{template}'");
 
-    binmode(STDOUT, ":utf8");
+    binmode(STDOUT, ":encoding(UTF-8)");
 
     my $cookie = CGI::Simple::Cookie->new(
         -name    => 'lang',
@@ -627,7 +627,7 @@ sub req_download_accounts {
         ],
     );
 
-    binmode(STDOUT, ":utf8");
+    binmode(STDOUT, ":encoding(UTF-8)");
 
     print $self->{cgi}->header(
         -type                => 'text/csv',
-- 
GitLab