diff options
| author | Thierry Vignaud <tv@mandriva.org> | 2008-09-11 17:36:59 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mandriva.org> | 2008-09-11 17:36:59 +0000 |
| commit | 1f41eda539f23fae9b61e8b8fba16caf592aa739 (patch) | |
| tree | 30e856e2c4b44f28ac455fc7c1e6ef93b244f6da /perl-install/install/steps_gtk.pm | |
| parent | 3f7dac3adcf9a91d5d9106c46fc48dcbf805d5ab (diff) | |
| download | drakx-backup-do-not-use-1f41eda539f23fae9b61e8b8fba16caf592aa739.tar drakx-backup-do-not-use-1f41eda539f23fae9b61e8b8fba16caf592aa739.tar.gz drakx-backup-do-not-use-1f41eda539f23fae9b61e8b8fba16caf592aa739.tar.bz2 drakx-backup-do-not-use-1f41eda539f23fae9b61e8b8fba16caf592aa739.tar.xz drakx-backup-do-not-use-1f41eda539f23fae9b61e8b8fba16caf592aa739.zip | |
(reallyChooseDesktop) add better title to preview popup
Diffstat (limited to 'perl-install/install/steps_gtk.pm')
| -rw-r--r-- | perl-install/install/steps_gtk.pm | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/perl-install/install/steps_gtk.pm b/perl-install/install/steps_gtk.pm index 8fb1a4973..dbafdcf67 100644 --- a/perl-install/install/steps_gtk.pm +++ b/perl-install/install/steps_gtk.pm @@ -255,8 +255,13 @@ sub reallyChooseDesktop { my $img = gtksignal_connect( gtkadd(Gtk2::EventBox->new, gtknew('Image', file => "desktop-$val->[0]")), 'button-press-event' => sub { - my $wp = ugtk2->new(N("Help"), transient => $w->{real_window}, modal => 1, - ); + my %title = ( + KDE => N("KDE Desktop"), + GNOME => N("GNOME Desktop"), + Custom => N("Custom Desktop"), + ); + + my $wp = ugtk2->new($title{$val->[1]}, transient => $w->{real_window}, modal => 1,); gtkadd($wp->{rwindow}, gtkpack_(Gtk2::VBox->new, 0, N("Here's a preview of the '%s' desktop.", $val->[1]), |