From 85540876d5056edf3207a3c16f0b6da52f0e4fa9 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 8 Mar 2004 09:05:42 +0000 Subject: (mk_frame) fix combo boxes filling --- perl-install/standalone/draksplash | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) (limited to 'perl-install/standalone/draksplash') diff --git a/perl-install/standalone/draksplash b/perl-install/standalone/draksplash index 6686f8cde..83625ea08 100755 --- a/perl-install/standalone/draksplash +++ b/perl-install/standalone/draksplash @@ -382,11 +382,12 @@ sub mk_frame { $adj{$1} and $adj{$1}->set_value($theme{boot_conf}{$1}); #- look for combo my @popdown; - $ref->{widget}{combo}{$1} - and @popdown = @{$ref->{widget}{combo}{$1}} - and $ref->{widgets}{combo}{$1} = new Gtk2::Combo - and $hboxes{$key}->add($ref->{widgets}{combo}{$1}) - and $ref->{widgets}{combo}{$1}->set_popdown_strings(@popdown); + if ($ref->{widget}{combo}{$1}) { + @popdown = @{$ref->{widget}{combo}{$1}}; + $ref->{widgets}{combo}{$1} = new Gtk2::Combo; + $hboxes{$key}->add($ref->{widgets}{combo}{$1}); + $ref->{widgets}{combo}{$1}->set_popdown_strings(@popdown); + } #- look for checkbox $ref->{widget}{check}{$1} and $ref->{widgets}{check}{$1} = new Gtk2::CheckButton($ref->{widget}{check}{$1}) -- cgit v1.2.1