summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xdhcp_wizard/Dhcp.pm20
-rw-r--r--installsrv_wizard/Installsrv.pm4
2 files changed, 12 insertions, 12 deletions
diff --git a/dhcp_wizard/Dhcp.pm b/dhcp_wizard/Dhcp.pm
index 441ba0fa..43857a6e 100755
--- a/dhcp_wizard/Dhcp.pm
+++ b/dhcp_wizard/Dhcp.pm
@@ -61,16 +61,16 @@ $o->{pages} = {
next => 'ip_range'
},
ip_range => {
- name => N("Range of addresses used by dhcp") . "\n\n\n" . N("Select the range of addresses assigned to the workstations by the DHCP service; unless you have special needs, you can safely accept the proposed values. (ie: 192.168.100.20 192.168.100.40)") . "\n\n" . N("If You want to enable PXE for your dhcp server please check the box."),
- pre => sub {
+ name => N("Range of addresses used by dhcp") . "\n\n\n" . N("Select the range of addresses assigned to the workstations by the DHCP service; unless you have special needs, you can safely accept the proposed values. (ie: 192.168.100.20 192.168.100.40)") . "\n\n" . N("If You want to enable PXE in your dhcp server please check the box (Pre-boot eXecution Environment, a protocol that allow computers to boot through the network)."),
+ pre => sub {
$o->{var}{ip1} ||= compute_range();
$o->{var}{ip2} ||= compute_range2();
},
post => \&check,
data => [
- { label => N("Lowest IP Address:"), val => \$o->{var}{ip1} },
- { label => N("Highest IP Address:"), val => \$o->{var}{ip2} },
- { label => N("Gateway IP Address:"), val => \$o->{var}{gateway} },
+ { label => N("Lowest IP address:"), val => \$o->{var}{ip1} },
+ { label => N("Highest IP address:"), val => \$o->{var}{ip2} },
+ { label => N("Gateway IP address:"), val => \$o->{var}{gateway} },
{ label => N("Enable PXE:"), type => 'bool', val => \$o->{var}{pxe} },
],
next => 'summary'
@@ -106,14 +106,14 @@ $o->{pages} = {
next => 'ip_range'
},
summary => {
- name => N("Configuring the DHCP Server") . "\n\n" . N("The wizard collected the following parameters needed to configure your DHCP service:"),
+ name => N("Configuring the DHCP server") . "\n\n" . N("The wizard collected the following parameters needed to configure your DHCP service:"),
pre => sub {
$o->{var}{pxeornot} = $o->{var}{pxe} ? N("enabled") : N("disabled");
},
data => [
- { label => N("Lowest IP Address:"), fixed_val => \$o->{var}{ip1} },
- { label => N("Highest IP Address:"), fixed_val => \$o->{var}{ip2} },
- { label => N("Gateway IP Address:"), fixed_val => \$o->{var}{gateway} },
+ { label => N("Lowest IP address:"), fixed_val => \$o->{var}{ip1} },
+ { label => N("Highest IP address:"), fixed_val => \$o->{var}{ip2} },
+ { label => N("Gateway IP address:"), fixed_val => \$o->{var}{gateway} },
{ label => N("Interface:"), fixed_val => \$o->{var}{einterface} },
{ label => N("Enable PXE:"), fixed_val => \$o->{var}{pxeornot} },
],
@@ -121,7 +121,7 @@ $o->{pages} = {
next => 'end'
},
end => {
- name => N("Congratulations") . "\n\n" . N("The wizard successfully configured the DHCP services of your server."),
+ name => N("Congratulations") . "\n\n" . N("The wizard successfully configured the DHCP services."),
end => 1,
next => 0
},
diff --git a/installsrv_wizard/Installsrv.pm b/installsrv_wizard/Installsrv.pm
index 42803d37..ed3f2bc7 100644
--- a/installsrv_wizard/Installsrv.pm
+++ b/installsrv_wizard/Installsrv.pm
@@ -76,11 +76,11 @@ $o->{pages} = {
next => 'install_srv',
},
dir_already_use => {
- name => N("The Destination directory already in use, please choose another one."),
+ name => N("The destination directory already in use, please choose another one."),
next => 'install_srv',
},
summary_srv => {
- name => N("Your install server will be configured with those parameters"),
+ name => N("Your install server will be configured with these parameters"),
pre => sub {
$o->{var}{nfs} = $o->{var}{wiz_nfs} ? N("enabled") : N("disabled");
$o->{var}{http} = $o->{var}{wiz_http} ? N("enabled") : N("disabled");