From 52d892c7c77a15843b9064d5215dced57b3ebec8 Mon Sep 17 00:00:00 2001 From: Angelo Naselli Date: Thu, 28 May 2015 14:56:26 +0200 Subject: Empty string -not undef- to use locale char (see iconv_open(3)) --- lib/ManaTools/Shared/Locales.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'lib/ManaTools/Shared/Locales.pm') diff --git a/lib/ManaTools/Shared/Locales.pm b/lib/ManaTools/Shared/Locales.pm index ec54614..26ba789 100644 --- a/lib/ManaTools/Shared/Locales.pm +++ b/lib/ManaTools/Shared/Locales.pm @@ -221,7 +221,7 @@ sub N_ { $self: this object $s: string to be converted -=head3 OUTPUT\ +=head3 OUTPUT $converted: converted string @@ -235,7 +235,7 @@ sub N_ { sub from_utf8 { my ($self, $s) = @_; - my $converter = Text::Iconv->new("utf-8", undef); + my $converter = Text::Iconv->new("utf-8", ""); my $converted = $converter->convert($s); return $converted; @@ -251,7 +251,7 @@ sub from_utf8 { $self: this object $s: string to be converted -=head3 OUTPUT\ +=head3 OUTPUT $converted: converted string @@ -265,7 +265,7 @@ sub from_utf8 { sub to_utf8 { my ($self, $s) = @_; - my $converter = Text::Iconv->new(undef, "utf-8"); + my $converter = Text::Iconv->new("", "utf-8"); my $converted = $converter->convert($s); return $converted; -- cgit v1.2.1