summaryrefslogtreecommitdiffstats
path: root/client_wizard
diff options
context:
space:
mode:
Diffstat (limited to 'client_wizard')
-rwxr-xr-xclient_wizard/Bind_client.pm26
1 files changed, 13 insertions, 13 deletions
diff --git a/client_wizard/Bind_client.pm b/client_wizard/Bind_client.pm
index 44b692e8..3a62c027 100755
--- a/client_wizard/Bind_client.pm
+++ b/client_wizard/Bind_client.pm
@@ -35,7 +35,7 @@ my $wiz_ip_server = $wiz->{net}->itf_get("IPADDR");
my $wiz_domain_name = $wiz->{net}->network_get("DOMAINNAME");
my $o = {
- name => N('DNS Client Wizard'),
+ name => N("DNS Client Wizard"),
var => {
client_ip => '',
client_name => ''
@@ -44,7 +44,7 @@ my $o = {
defaultimage => "$ENV{__WIZ_HOME__}client_wizard/images/DNS.png",
init => sub {
if (! -f "/var/named/$wiz_domain_name.db") {
- return (0, N('You must first run the DNS server wizard'))
+ return (0, N("You must first run the DNS server wizard"))
}
1
}
@@ -52,49 +52,49 @@ my $o = {
$o->{pages} = {
welcome => {
- name => N('DNS Client Wizard') . "\n\n" . N('A client of your local network is a machine connected to the network having its own name and IP number.') . "\n\n" . N('This wizard will help you in adding a new client in your local DNS.') . "\n\n" . N('The server will use the informations you enter here to make the name of the client available to other machines into your network.') . "\n\n" . N('Press next to begin, or Cancel to leave this wizard.'),
+ name => N("DNS Client Wizard") . "\n\n" . N("A client of your local network is a machine connected to the network having its own name and IP number.") . "\n\n" . N("This wizard will help you in adding a new client in your local DNS.") . "\n\n" . N("The server will use the informations you enter here to make the name of the client available to other machines into your network.") . "\n\n" . N("Press next to begin, or Cancel to leave this wizard."),
post => sub { $wiz->check_dhcp },
no_back => 1,
next => 'client_id'
},
client_id => {
- name => N('Client identification:') . "\n\n" . N('Your client on the network will be identified by name, as in clientname.company.net. Every machine on the network must have a (unique) IP address, in the usual dotted syntax.') . "\n\n" . N("(you don't need to type the domain after the name)") . "\n\n" . N('Note that the given IP number and client name should be unique in the network.'),
+ name => N("Client identification:") . "\n\n" . N("Your client on the network will be identified by name, as in clientname.company.net. Every machine on the network must have a (unique) IP address, in the usual dotted syntax.") . "\n\n" . N("(you don't need to type the domain after the name)") . "\n\n" . N("Note that the given IP number and client name should be unique in the network."),
pre => sub {
$o->{var}{client_ip} = ip();
$o->{var}{client_name} = name();
},
data => [
- { label => N('Name of the machine:'), val => \$o->{var}{client_name} },
- { label => N('IP number of the machine:'), val => \$o->{var}{client_ip} },
+ { label => N("Name of the machine:"), val => \$o->{var}{client_name} },
+ { label => N("IP number of the machine:"), val => \$o->{var}{client_ip} },
],
next => 'summary'
},
dhcp_warning => {
- name => N('Warning') . "\n\n" . N('You are in dhcp, server may not work with your configuration.'),
+ name => N("Warning") . "\n\n" . N("You are in dhcp, server may not work with your configuration."),
ignore => 1,
next => 'client_id'
},
system_error => {
- name => N('Error') . "\n\n" . N('System error, no configuration done'),
+ name => N("Error") . "\n\n" . N("System error, no configuration done"),
ignore => 1,
next => 'client_id'
},
error => {
- name => N('Error') . "\n\n" . N('This is not a valid address... press next to continue'),
+ name => N("Error") . "\n\n" . N("This is not a valid address... press next to continue"),
ignore => 1,
next => 'client_id'
},
summary => {
- name => N('Adding a new client to your network') . "\n\n" . N('The wizard collected the following parameters needed to add a client to your network:') . "\n\n" . N('To accept these values, and add your client, click the Next button or use the Back button to correct them.'),
+ name => N("Adding a new client to your network") . "\n\n" . N("The wizard collected the following parameters needed to add a client to your network:") . "\n\n" . N("To accept these values, and add your client, click the Next button or use the Back button to correct them."),
data => [
- { label => N('Client name'), fixed_val => \$o->{var}{client_name} },
- { label => N('Client IP:'), fixed_val => \$o->{var}{client_ip} },
+ { label => N("Client name"), fixed_val => \$o->{var}{client_name} },
+ { label => N("Client IP:"), fixed_val => \$o->{var}{client_ip} },
],
post => \&do_it,
next => 'end'
},
end => {
- name => N('Congratulationss') . "\n\n" . N('The wizard successfully added the client.'),
+ name => N("Congratulationss") . "\n\n" . N("The wizard successfully added the client."),
end => 1,
next => 0
},