| Subject: | Locale::Maketext broken with use utf8; |
| Date: | Wed, 06 Feb 2008 13:12:56 +0100 |
| To: | bug-Locale-Maketext [...] rt.cpan.org |
| From: | Felix Antonius Wilhelm Ostmann <ostmann [...] websuche.de> |
Log::Log4perl: 1.12
perl: v5.8.8
uname: Linux www1 2.6.17-2-686 #1 SMP Wed Sep 13 16:34:10 UTC 2006 i686
GNU/Linux
i have to overwrite the maketext function, becouse non-ascii strings are
not found in the %Lexicon
in Lexicon are the keys encoded like
'german umlaut ue: ü'
from the skript the string comes decoded like
"german umlaut ue: \x{fc}"
every file is in utf8, every .pm has use utf8;
the .po is in utf, the content-type encoding is utf8 ...
i dont find any hint how this could work properly.
sub maketext {
my($class, @args) = @_;
for( @args ) {
utf8::is_utf8($_)
and utf8::encode($_);
}
my $string = $class->SUPER::maketext(@args);
utf8::is_utf8($string)
or utf8::decode($string);
return $string;
}