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 /lib | |
parent | 2f961dd91655477edac2b3c6a50db011fcf00e84 (diff) | |
download | manatools-52d892c7c77a15843b9064d5215dced57b3ebec8.tar manatools-52d892c7c77a15843b9064d5215dced57b3ebec8.tar.gz manatools-52d892c7c77a15843b9064d5215dced57b3ebec8.tar.bz2 manatools-52d892c7c77a15843b9064d5215dced57b3ebec8.tar.xz manatools-52d892c7c77a15843b9064d5215dced57b3ebec8.zip |
Empty string -not undef- to use locale char (see iconv_open(3))
Diffstat (limited to 'lib')
-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 ec546141..26ba7890 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; |