diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-05-24 13:10:24 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-05-24 13:10:24 +0000 |
| commit | 762dee42a6cbe4a3e803d402ccadc8050897752e (patch) | |
| tree | dc99aaa2ba5ec957f2c1854557e96be6778b3618 /perl-install/standalone/draksplash | |
| parent | 55e82bbb21c394f5d939a3b3827ceb99364554cb (diff) | |
| download | drakx-762dee42a6cbe4a3e803d402ccadc8050897752e.tar drakx-762dee42a6cbe4a3e803d402ccadc8050897752e.tar.gz drakx-762dee42a6cbe4a3e803d402ccadc8050897752e.tar.bz2 drakx-762dee42a6cbe4a3e803d402ccadc8050897752e.tar.xz drakx-762dee42a6cbe4a3e803d402ccadc8050897752e.zip | |
switch from deprecated OptionMenu into new ComboBox widget
Diffstat (limited to 'perl-install/standalone/draksplash')
| -rwxr-xr-x | perl-install/standalone/draksplash | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/standalone/draksplash b/perl-install/standalone/draksplash index 3101128fd..703896be4 100755 --- a/perl-install/standalone/draksplash +++ b/perl-install/standalone/draksplash @@ -389,8 +389,9 @@ sub mk_frame { my @popdown; if ($ref->{widget}{combo}{$1}) { @popdown = @{$ref->{widget}{combo}{$1}}; - my $w = $ref->{widgets}{combo}{$1} = $ref->{widget}{extras}{$1}{noneditable} ? Gtk2::OptionMenu->new : Gtk2::Combo->new; + my $w = $ref->{widgets}{combo}{$1} = $ref->{widget}{extras}{$1}{noneditable} ? Gtk2::ComboBox->new_text : Gtk2::Combo->new; $ref->{widgets}{combo}{$1}->set_popdown_strings(@popdown); + $w->set_active(0) if $w->isa('Gtk2::ComboBox'); push @widgets, $w; } |