utf8 bug ?

[Quentin <squentin free fr>]

Hi,
Setting a label (or something else, works with a treestore) with a perl
variable, change the encoding of the perl variable to utf8.


use Gtk2 '-init';
my $string='a string';
warn '$string is '.(utf8::is_utf8($string)? '':'not ')."utf8";
my $label=Gtk2::Label->new($string);
warn '$string is '.(utf8::is_utf8($string)? '':'not ')."utf8";

this sample code outputs :
$string is not utf8 at utf8.pl line 3.
$string is utf8 at utf8.pl line 5.

I use perl-Gtk2-1.023-3mdk.


-- 
Quentin <squentin free fr>