diff options
| -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') { |