X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/cbd1249e5c245ee605c32c6cdbdc1e26f92643d0..7f34b3c1f69619eaf3c41945ab22cf21883bb945:/SL/Iconv.pm diff --git a/SL/Iconv.pm b/SL/Iconv.pm index c2f2247ea..d6ea0cbdf 100644 --- a/SL/Iconv.pm +++ b/SL/Iconv.pm @@ -19,7 +19,7 @@ sub new { return $self; } -sub get_converter { +sub _get_converter { my ($from_charset, $to_charset) = @_; my $index = join $SUBSCRIPT_SEPARATOR, $from_charset, $to_charset; @@ -36,7 +36,7 @@ sub convert { $from_charset ||= Common::DEFAULT_CHARSET; $to_charset ||= Common::DEFAULT_CHARSET; - my $converter = get_converter($from_charset, $to_charset); + my $converter = _get_converter($from_charset, $to_charset); return $converter->convert($text); }