Workaround for Wx/GTK bug on Linux

This commit is contained in:
Alessandro Ranellucci 2011-10-03 19:15:07 +02:00
parent 71a373e437
commit 865e234a44
2 changed files with 1 additions and 1 deletions

View file

@ -17,6 +17,7 @@ sub new {
foreach my $opt (@{$p{options}}) {
my $label = Wx::StaticText->new($parent, -1, "$opt->{label}:", Wx::wxDefaultPosition, [180,-1]);
$label->Wrap(180); # needed to avoid Linux/GTK bug
my $field;
if ($opt->{type} =~ /^(i|f)$/) {
$field = Wx::TextCtrl->new($parent, -1, ${$opt->{value}});