summaryrefslogtreecommitdiffstats
path: root/perl-install/install/steps_gtk.pm
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.com>2008-10-02 16:34:37 +0000
committerOlivier Blin <oblin@mandriva.com>2008-10-02 16:34:37 +0000
commitcb0cbeec7ca211d0e68cbfad349a023b76b195d5 (patch)
treefed8e304df9c7d8226d447f33d44b3f92e933780 /perl-install/install/steps_gtk.pm
parent13023a5c5ba4178c3d34204b8477d006cf587705 (diff)
downloaddrakx-cb0cbeec7ca211d0e68cbfad349a023b76b195d5.tar
drakx-cb0cbeec7ca211d0e68cbfad349a023b76b195d5.tar.gz
drakx-cb0cbeec7ca211d0e68cbfad349a023b76b195d5.tar.bz2
drakx-cb0cbeec7ca211d0e68cbfad349a023b76b195d5.tar.xz
drakx-cb0cbeec7ca211d0e68cbfad349a023b76b195d5.zip
pass default choice to install::steps_gtk::reallyChooseDesktop
Diffstat (limited to 'perl-install/install/steps_gtk.pm')
-rw-r--r--perl-install/install/steps_gtk.pm3
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/install/steps_gtk.pm b/perl-install/install/steps_gtk.pm
index ab29b4f15..095b80941 100644
--- a/perl-install/install/steps_gtk.pm
+++ b/perl-install/install/steps_gtk.pm
@@ -228,11 +228,10 @@ sub selectMouse {
}
sub reallyChooseDesktop {
- my ($o, $title, $message, $choices) = @_;
+ my ($o, $title, $message, $choices, $choice) = @_;
my $w = ugtk2->new($title);
- my $choice = $choices->[0];
my %tips = (
KDE => N("Install Mandriva KDE Desktop"),
GNOME => N("Install Mandriva GNOME Desktop"),