[wxperl-users] wxListItem -> GetFont ???

[Marco T. <mt...@so...>]

hello

i need to know if a wxListItem has a bold font or not. i thought this would be
easy to get with:
print "bold\n" if($listCtrl->GetItem($i)->GetFont->GetWeight == wxBOLD);

but this crashes perl (win98, wxPerl0.10)

i was really confused and tried this:

> my $item = Wx::ListItem->new;
> my $font = Wx::Font->new(8, wxDEFAULT, wxNORMAL, wxBOLD);
> $item->SetFont($font);
> print $font->GetWeight . " -> " . $item->GetFont->GetWeight . "\n";

$font->GetWeight works here.
but the other one causes perl to crash too.

so, can't i use GetFont as i can with SetFont?
if yes, how can i get if the current item has a bold font or not?

greeting
Marco