summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/draksplash
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-05-24 13:10:24 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-05-24 13:10:24 +0000
commit762dee42a6cbe4a3e803d402ccadc8050897752e (patch)
treedc99aaa2ba5ec957f2c1854557e96be6778b3618 /perl-install/standalone/draksplash
parent55e82bbb21c394f5d939a3b3827ceb99364554cb (diff)
downloaddrakx-backup-do-not-use-762dee42a6cbe4a3e803d402ccadc8050897752e.tar
drakx-backup-do-not-use-762dee42a6cbe4a3e803d402ccadc8050897752e.tar.gz
drakx-backup-do-not-use-762dee42a6cbe4a3e803d402ccadc8050897752e.tar.bz2
drakx-backup-do-not-use-762dee42a6cbe4a3e803d402ccadc8050897752e.tar.xz
drakx-backup-do-not-use-762dee42a6cbe4a3e803d402ccadc8050897752e.zip
switch from deprecated OptionMenu into new ComboBox widget
Diffstat (limited to 'perl-install/standalone/draksplash')
-rwxr-xr-xperl-install/standalone/draksplash3
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;
}