From 4b04c0492f50d124c9c7f6e91d8b0f5c9f6e5d68 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Tue, 31 Aug 2004 05:36:08 +0000 Subject: (build_notebook) fix crashes (#11100) --- perl-install/standalone/drakconnect | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) (limited to 'perl-install/standalone/drakconnect') diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect index 321dd1110..0301722bf 100755 --- a/perl-install/standalone/drakconnect +++ b/perl-install/standalone/drakconnect @@ -582,7 +582,16 @@ sub build_notebook { ); } - $gui->{intf}{$_}->set_text($intf->{$_}) foreach keys %{$gui->{intf}}; + foreach (keys %{$gui->{intf}}) { + next if ref($gui->{intf}{$_}) ne 'Gtk2::ComboBox'; + # skip unset fields: + next if !$intf->{$_}; + # special case b/c of translation: + next if member($_, qw(BOOTPROTO )); + warn qq(processing "$_"\n); + $gui->{intf}{$_}->set_text($intf->{$_}); + } + $gui->{notebook} = Gtk2::Notebook->new; populate_notebook($gui->{notebook}, $gui); } -- cgit v1.2.1