From 0ec83e412f08613f2a79274e623cb8cb073202b1 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 21 Jan 2003 14:05:22 +0000 Subject: workaround set_active on Gtk2::CheckButton widgets thinking undef is true :-( (hopefully, gc will fix perl-GTK2!) --- perl-install/install_steps_gtk.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index 583fb8a47..a41fb476b 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -238,7 +238,7 @@ sub reallyChooseGroups { $w_size, if_($individual, do { my $check = Gtk2::CheckButton->new(N("Individual package selection")); - $check->set_active($$individual); + $check->set_active($$individual ? 1 : 0); $check->signal_connect(clicked => sub { $$individual = $check->get_active }); $check; }), -- cgit v1.2.1