diff options
| author | Angelo Naselli <anaselli@linux.it> | 2015-05-28 14:56:26 +0200 |
|---|---|---|
| committer | Angelo Naselli <anaselli@linux.it> | 2015-05-28 14:56:26 +0200 |
| commit | 52d892c7c77a15843b9064d5215dced57b3ebec8 (patch) | |
| tree | 2aaade36020deea876fd05b21d6523ad75e3ce31 | |
| parent | 2f961dd91655477edac2b3c6a50db011fcf00e84 (diff) | |
| download | colin-keep-52d892c7c77a15843b9064d5215dced57b3ebec8.tar colin-keep-52d892c7c77a15843b9064d5215dced57b3ebec8.tar.gz colin-keep-52d892c7c77a15843b9064d5215dced57b3ebec8.tar.bz2 colin-keep-52d892c7c77a15843b9064d5215dced57b3ebec8.tar.xz colin-keep-52d892c7c77a15843b9064d5215dced57b3ebec8.zip | |
Empty string -not undef- to use locale char (see iconv_open(3))
| -rw-r--r-- | lib/ManaTools/Shared/Locales.pm | 8 |
1 files changed, 4 insertions, 4 deletions
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; |