fix N() encapsuled strings not seen as "to be extracted" strings when

generating the pot

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
 	  },