summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/draksplash11
1 files changed, 6 insertions, 5 deletions
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})