From f18bc044d8e533cd07956df2e5030c2d3c8d3d93 Mon Sep 17 00:00:00 2001
From: Angelo Naselli <anaselli@linux.it>
Date: Mon, 1 Sep 2014 22:38:40 +0200
Subject: perl 5.20.0 does not like that an external lib set locales

---
 lib/AdminPanel/Shared/Locales.pm | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/lib/AdminPanel/Shared/Locales.pm b/lib/AdminPanel/Shared/Locales.pm
index 4bb14740..2015a487 100644
--- a/lib/AdminPanel/Shared/Locales.pm
+++ b/lib/AdminPanel/Shared/Locales.pm
@@ -120,6 +120,11 @@ has 'domain' => (
 sub BUILD {
     my $self = shift;
 
+    if ($^V ge v5.20.0) {
+        require POSIX;
+        POSIX::setlocale (POSIX::LC_ALL (), '');
+    }
+
     $self->domain(Locale::gettext->domain_raw($self->domain_name));
     $self->domain->dir($self->dir_name) if $self->dir_name;
     $self->domain->codeset($self->codeset)
-- 
cgit v1.2.1