diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-09-01 03:45:11 +0200 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-11-24 21:28:37 +0100 |
| commit | 452a6077f9356526be17355e008362fbf46309f8 (patch) | |
| tree | 83e2c366fc3e7e4648c5d1ae3b7e5ecaa28b9f25 /perl-install/ugtk3.pm | |
| parent | db33f2f905bd8778c0a92015dba536854167fff7 (diff) | |
| download | drakx-452a6077f9356526be17355e008362fbf46309f8.tar drakx-452a6077f9356526be17355e008362fbf46309f8.tar.gz drakx-452a6077f9356526be17355e008362fbf46309f8.tar.bz2 drakx-452a6077f9356526be17355e008362fbf46309f8.tar.xz drakx-452a6077f9356526be17355e008362fbf46309f8.zip | |
(gtkradio) workaround gtk+ issue
else we got: "object 36b6540 is not really a GObject at
(...)/Glib/Object/Introspection.pm line 61."
See also bgo#679563
Diffstat (limited to 'perl-install/ugtk3.pm')
| -rw-r--r-- | perl-install/ugtk3.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/ugtk3.pm b/perl-install/ugtk3.pm index 74fc1f21f..07c0ee725 100644 --- a/perl-install/ugtk3.pm +++ b/perl-install/ugtk3.pm @@ -146,7 +146,7 @@ sub gtkradio { my $def = shift; my $radio; map { - my $w = gtkset_active($radio = Gtk3::RadioButton->new_with_label($radio ? $radio->get_group : undef, $_), $_ eq $def); + my $w = gtkset_active($radio = Gtk3::RadioButton->new_with_label_from_widget($radio, $_), $_ eq $def); $w->get_child->set_line_wrap(1); $w; } @_; |