diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-01-03 18:19:43 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-01-03 18:19:43 +0000 |
| commit | 27c399a88f3f75ecd78b4464a86a94a835885784 (patch) | |
| tree | f39cc60a1a12d6eb0598d629324e9f73853caf4f | |
| parent | 6b7e1e5ba3348b4f6c2bcae6fe659d742991b63b (diff) | |
| download | drakx-27c399a88f3f75ecd78b4464a86a94a835885784.tar drakx-27c399a88f3f75ecd78b4464a86a94a835885784.tar.gz drakx-27c399a88f3f75ecd78b4464a86a94a835885784.tar.bz2 drakx-27c399a88f3f75ecd78b4464a86a94a835885784.tar.xz drakx-27c399a88f3f75ecd78b4464a86a94a835885784.zip | |
fix english messages
| -rw-r--r-- | perl-install/any.pm | 2 | ||||
| -rw-r--r-- | perl-install/install_steps_gtk.pm | 2 | ||||
| -rw-r--r-- | perl-install/install_steps_interactive.pm | 4 |
3 files changed, 4 insertions, 4 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index 389c57511..708cf2507 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -790,7 +790,7 @@ Do you want to use this feature?"), sub selectLanguage { my ($in, $lang, $langs) = @_; $in->ask_from_( - { messages => _("Please, choose a language to use."), + { messages => _("Please choose a language to use."), title => 'language choice', advanced_messages => _("You can choose other languages that will be available after install"), callbacks => { diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index 63b35c469..5350faf2f 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -159,7 +159,7 @@ sub selectInstallClass1 { my $w = my_gtk->new(_("Install Class")); my $focused; gtkadd($w->{window}, - gtkpack($w->create_box_with_title(_("Please, choose one of the following classes of installation:")), + gtkpack($w->create_box_with_title(_("Please choose one of the following classes of installation:")), (my @radios = gtkradio($def, @$l)), gtkadd(create_hbox(), map { my $v = $_; diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index 2e4503851..2ad4cc798 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -196,7 +196,7 @@ sub selectKeyboard { my $ext_keyboard = $o->{keyboard}; $o->ask_from_( { title => _("Keyboard"), - messages => _("Please, choose your keyboard layout."), + messages => _("Please choose your keyboard layout."), advanced_messages => _("Here is the full list of keyboards available"), advanced_label => _("More"), callbacks => { changed => sub { $other = $_[0]==1 } }, @@ -251,7 +251,7 @@ sub selectMouse { my $prev = $o->{mouse}{type} . '|' . $o->{mouse}{name}; $o->{mouse} = mouse::fullname2mouse( - $o->ask_from_treelist_('', _("Please, choose the type of your mouse."), + $o->ask_from_treelist_('', _("Please choose the type of your mouse."), '|', [ mouse::fullnames ], $prev) || return) if $force; if ($force && $o->{mouse}{type} eq 'serial') { |