diff options
Diffstat (limited to 'perl-install/standalone')
| -rwxr-xr-x | perl-install/standalone/drakbackup | 6 | ||||
| -rwxr-xr-x | perl-install/standalone/drakconnect | 2 | ||||
| -rwxr-xr-x | perl-install/standalone/drakfloppy | 2 | ||||
| -rwxr-xr-x | perl-install/standalone/drakfont | 26 | ||||
| -rwxr-xr-x | perl-install/standalone/drakgw | 10 | ||||
| -rwxr-xr-x | perl-install/standalone/drakperm | 4 | ||||
| -rwxr-xr-x | perl-install/standalone/draksplash | 4 |
7 files changed, 27 insertions, 27 deletions
diff --git a/perl-install/standalone/drakbackup b/perl-install/standalone/drakbackup index 54353f265..80d47e4c1 100755 --- a/perl-install/standalone/drakbackup +++ b/perl-install/standalone/drakbackup @@ -1351,7 +1351,7 @@ sub build_backup_files { if ($send_mail) { if (send_mail($results)) { $interactive and send_mail_pb(); - $interactive or print N(" Error during mail sending. \n"); + $interactive or print N(" Error while sending mail. \n"); } } @@ -4675,7 +4675,7 @@ sub adv_help { This option allows you select all users that you want to backup. To preserve disk space, it is recommended that you - do not include web browser's cache. + do not include the web browser's cache. - Backup Other files: @@ -4688,7 +4688,7 @@ sub adv_help { The incremental backup is the most powerful option for backup. This option allows you to backup all your data the first time, and - only the changed afterward. + only the changed data afterward. Then you will be able, during the restore step, to restore your data from a specified date. diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect index 504bf7add..b79d8ee57 100755 --- a/perl-install/standalone/drakconnect +++ b/perl-install/standalone/drakconnect @@ -537,7 +537,7 @@ sub configure_net { my (undef, $_prefix, $netcnx, $netc, $_intf) = @_; if (!$netcnx->{type}) { my $dialog = new_dialog(); - $dialog->vbox->pack_start(new Gtk2::Label(N("You don't have any internet connection. + $dialog->vbox->pack_start(new Gtk2::Label(N("You don't have an Internet connection. Create one first by clicking on 'Configure'")),1,1,0); my $bbox_dialog = new Gtk2::HButtonBox; $dialog->action_area->add($bbox_dialog); diff --git a/perl-install/standalone/drakfloppy b/perl-install/standalone/drakfloppy index 0ac4c4160..082edf842 100755 --- a/perl-install/standalone/drakfloppy +++ b/perl-install/standalone/drakfloppy @@ -346,7 +346,7 @@ sub build_it { while (<STATUS>) { $output->insert($fixed_font, undef, undef, $_); } - close STATUS or create_dialog(N("Unable to close properly mkbootdisk: \n %s \n %s", $!, $?), 0); + close STATUS or create_dialog(N("Unable to properly close mkbootdisk: \n %s \n %s", $!, $?), 0); return (0); } diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont index 807d44831..e34d758cb 100755 --- a/perl-install/standalone/drakfont +++ b/perl-install/standalone/drakfont @@ -47,13 +47,13 @@ # Commands buttons: # - import from windows partition. # import from all fat32 partitions and look for winnt/windows/font -# and import all (delete doublon) but don't import if already exist. +# and import all (delete doubles) but don't import if they already exist. # - import from directory -# look for if it exist before for each font and not delete the original. +# look to see if each font exists and do not delete the original. # (replace all, no, none) # expert options: -# ask the directory, and look for if it exist before -# if it exist ask: (replace all, no, none) +# specify the directory, and look to see if it exists before +# if it exists ask: (replace all, no, none) # - uninstall with list per font type # Expert additional switch # - option support: ghostscript, Staroffice, etc... @@ -326,7 +326,7 @@ sub search_dir_font_uninstall { sub search_dir_font_uninstall_gi { @font_list = @uninstall; - $interactive and progress($pbar, 1, N("Search fonts in installed list")); + $interactive and progress($pbar, 1, N("Search for fonts in installed list")); } sub print_list { @@ -450,7 +450,7 @@ sub put_font_dir { $interactive and progress($pbar2, 1, N("done")); $interactive - and progress($pbar3, 0.25, N("Suppress temporary Files")); + and progress($pbar3, 0.25, N("Suppress Temporary Files")); rm_rf("$drakfont_dir/tmp/"); print "\n\nretarting xfs......\n"; $interactive and progress($pbar3, 0.5, N("Restart XFS")); @@ -530,7 +530,7 @@ sub remove_fonts { } sub license_msg { - print N("Before installing any fonts, be sure that you have the right to use and install them on your system.\n\n-You can install the fonts using the normal way. In rare cases, bogus fonts may hang up your X Server.") . "\n"; + print N("Before installing any fonts, be sure that you have the right to use and install them on your system.\n\n-You can install the fonts the normal way. In rare cases, bogus fonts may hang up your X Server.") . "\n"; } $list_all_font_path @@ -614,7 +614,7 @@ sub interactive_mode { $window1->{rwindow}->signal_connect(delete_event => sub { ugtk2->exit(0) }); unless ($::isEmbedded) { $window1->{rwindow}->set_position('center'); - $window1->{rwindow}->set_title(N("Fonts Importation")); + $window1->{rwindow}->set_title(N("Import Fonts")); } $window1->{rwindow}->set_border_width(5); @@ -817,13 +817,13 @@ Visual Interface: Commands buttons: - import from windows partition. import from all fat32 partitions and look for winnt/windows/font - and import all (delete doublon) but don't import if already exist. + and import all (delete doubles) but don't import if they already exist. - import from directory - look for if it exist before for each font and not delete the original. + look to see if each font exists and do not delete the original. (replace all, no, none) expert options: - ask the directory, and look for if it exist before - if it exist ask: (replace all, no, none) + specify the directory, and look to see if it exists before + if it exists ask: (replace all, no, none) - uninstall with list per font type Expert additional switch - option support: ghostscript, Staroffice, etc... @@ -895,7 +895,7 @@ sub appli_choice { 1, gtktext_insert( gtkset_editable($text, 0), - [ [ N("Before installing any fonts, be sure that you have the right to use and install them on your system.\n\n-You can install the fonts using the normal way. In rare cases, bogus fonts may hang up your X Server.") ] ] + [ [ N("Before installing any fonts, be sure that you have the right to use and install them on your system.\n\n-You can install the fonts the normal way. In rare cases, bogus fonts may hang up your X Server.") ] ] ), 0, new Gtk2::VBox(0, 10), diff --git a/perl-install/standalone/drakgw b/perl-install/standalone/drakgw index a8236197d..cde6cfe2b 100755 --- a/perl-install/standalone/drakgw +++ b/perl-install/standalone/drakgw @@ -123,7 +123,7 @@ if ($shorewall && $shorewall->{masquerade}) { if (!$shorewall->{disabled}) { my $r = $in->ask_from_list_(N("Internet Connection Sharing currently enabled"), -N("The setup of Internet connection sharing has already been done. +N("The setup of Internet Connection Sharing has already been done. It's currently enabled. What would you like to do?"), @@ -139,7 +139,7 @@ What would you like to do?"), sys("/etc/init.d/shorewall restart >/dev/null"); log::l("[drakgw] Disabled"); $::Wizard_finished = 1; - $in->ask_okcancel('', N("Internet connection sharing is now disabled.")); + $in->ask_okcancel('', N("Internet Connection Sharing is now disabled.")); quit_global($in, 0); } if ($r eq "dismiss") { @@ -163,7 +163,7 @@ What would you like to do?"), } log::l("[drakgw] Enabled"); $::Wizard_finished = 1; - $in->ask_okcancel('', N("Internet connection sharing is now enabled.")); + $in->ask_okcancel('', N("Internet Connection Sharing is now enabled.")); quit_global($in, 0); } if ($r eq "dismiss") { @@ -284,7 +284,7 @@ Driver: %s", $device, $conf->{NETWORK}, $conf->{IPADDR}, $conf->{BOOTPROTO}, $al The default DNS entry is the Caching Nameserver configured on the firewall. You can replace that with your ISP DNS IP, for example. -Else, I can reconfigure your interface and (re)configure a DHCP server for you. +Otherwise, I can reconfigure your interface and (re)configure a DHCP server for you. ", $device), [ { label => N("Local Network adress"), val => \$lan_address, type => 'entry' }, @@ -528,7 +528,7 @@ sub pur_gtk_mode { $window1->{rwindow}->signal_connect(delete_event => sub { ugtk2->exit(0) }); unless ($::isEmbedded) { $window1->{rwindow}->set_position('center'); - $window1->{rwindow}->set_title(N("Internet connection sharing configuration")); + $window1->{rwindow}->set_title(N("Internet Connection Sharing configuration")); } $window1->{rwindow}->border_width(10); my $vbox1 = new Gtk2::VBox(0,0); diff --git a/perl-install/standalone/drakperm b/perl-install/standalone/drakperm index 8d33efd33..83cc4630d 100755 --- a/perl-install/standalone/drakperm +++ b/perl-install/standalone/drakperm @@ -67,7 +67,7 @@ my $F = new Gtk2::Frame; $combo_perm->set_popdown_strings(sort(keys %perm)); $tips->set_tip($B_add, N("Add a new rule at the end")); -$tips->set_tip($B_edit, N("Edit curent rule")); +$tips->set_tip($B_edit, N("Edit current rule")); $tips->set_tip($B_up, N("Up selected rule one level")); $tips->set_tip($B_down, N("Down selected rule one level")); $tips->set_tip($B_del, N("Delete selected rule")); @@ -205,7 +205,7 @@ sub save_perm { close F; $modified = 0; } -#- on list selection we get all data concerning the curent selection +#- on list selection we get all data concerning the current selection sub row_setting_data { my (undef, $row, $column, undef ) = @_; %CURENT = ('clicked' => {'row' => $row, diff --git a/perl-install/standalone/draksplash b/perl-install/standalone/draksplash index 18d31b750..c1d7cd46c 100755 --- a/perl-install/standalone/draksplash +++ b/perl-install/standalone/draksplash @@ -87,8 +87,8 @@ my %first = ('frame' => new Gtk2::Frame(N("first step creation")), my %boot_conf_frame = ('frame' => new Gtk2::Frame(N("Configure bootsplash picture")), 'widget' => { 'label' => { - 'tx' => N("x coordinate of text box\nin number of character"), - 'ty' => N("y coordinate of text box\nin number of character"), + 'tx' => N("x coordinate of text box\nin number of characters"), + 'ty' => N("y coordinate of text box\nin number of characters"), 'tw' => N("text width"), 'th' => N("text box height"), 'px' => N("the progress bar x coordinate\nof its upper left corner"), |