add comment and information

1 files changed, 24 insertions, 23 deletions

diff --git a/pxe_wizard/Pxe.pm b/pxe_wizard/Pxe.pm
index d0bf2284..2f1b844e 100644
--- a/pxe_wizard/Pxe.pm
+++ b/pxe_wizard/Pxe.pm
@@ -58,6 +58,7 @@ my $DOMAINNAME = chomp_(`dnsdomainname`);
 
 my $o = {
 	 name => N("PXE Wizard"),
+	 allow_user => 'root',
 	 var => {
 		 IMG => '/var/install/92/images/network.img',
 		 PXENAME => '92',
@@ -74,7 +75,7 @@ my $o = {
 	 needed_rpm => [ 'pxe', 'tftp-server', 'xinetd' ],
 	 init => sub {
 	   if (member($DOMAINNAME, qw(localdomain (none)))) {
-             return 0, N("You need to readjust your domainname. For a DNS server you need a correct domainname, not equal to localdomain or none. Launch drakconnect to adjust it.")
+             return 0, N("You need to readjust your domainname, not equal to localdomain or none. Please launch drakconnect to adjust it.")
            }
            1
 	 },
@@ -108,7 +109,7 @@ my @list_eth = qw(eth0 eth1 eth2);
 #begin of wizard
 $o->{pages} = {
 	       welcome => {
-			   name => N("PXE wizard") . "\n\n" . N("Set a PXE server.") . "\n" . N("This wizard will help you configuring the PXE server. PXE (Pre-boot Execution Environment) is a protocol designed by Intel that allows computers to boot through the network. PXE is stored in the ROM of new generation network cards. When the computer boots up, the BIOS loads the PXE ROM in the memory and executes it. A menu is displayed, allowing the computer to boot an operating system loaded through the network.") . "\n" . N("This wizard will provide a pxe service, and ability to add/remove/modify boot images."),
+			   name => N("PXE wizard") . "\n\n" . N("Set a PXE server.") . "\n" . N("This wizard will help you configuring the PXE server, and PXE boot image management. PXE (Pre-boot Execution Environment) is a protocol designed by Intel that allows computers to boot through the network. PXE is stored in the ROM of new generation network cards. When the computer boots up, the BIOS loads the PXE ROM in the memory and executes it. A menu is displayed, allowing the computer to boot an operating system loaded through the network."),
 			   no_back => 1,
 			   pre => sub {
 			     $o->{var}{wiz_level} ||= 1;
@@ -131,7 +132,7 @@ $o->{pages} = {
 			   next => 'pxeserver',
 			  },
 	       addimg => {
-			  name => N("Add a boot image") . "\n\n" . N("Path to image: full path to image (need network boot image)") . "\n\n" . N("PXE name: name in PXE menu (one word/number, no space please)"),
+			  name => N("Add a boot image") . "\n\n" . N("To boot through network, network computer need a boot image. Morever we need to name this image, so each boot image is related to a name in PXE menu. So user can choose wich image he wants to boot through PXE.") . "\n\n" . N("PXE description is used to explain the rule of the boot image, ie: Mandrake 9.2 image, Mandrake cooker image..") . "\n\n" . N("Path to image: provide the full path to the network boot image") . "\n\n" . N("PXE name: the name displayed in PXE menu (please provide a word or a  number, with no space)"),
 			  data => [
 				   { label => "PXE name:", val => \$o->{var}{PXENAME} },
 				   { label => "PXE description:", val => \$o->{var}{DESCR} },
@@ -141,7 +142,7 @@ $o->{pages} = {
 			  next => 'summaryadd',
 			 },
 	       addimgrdz => {
-			     name => N("Add a boot image") . "\n\n" . N("Path to all.rdz: full path to all.rdz image") . "\n\n" . N("PXE name: name in PXE menu (one word/number, no space please)"),
+			     name => N("Add all.rdz boot image") . "\n\n" . N("To boot through network, network computer need a boot image. Morever we need to name this image, so each boot image is related to a name in PXE menu. So user can choose wich image he wants to boot through PXE.") . "\n\n" . N("PXE description is used to explain the rule of the boot image, ie: Mandrake 9.2 image, Mandrake cooker image..") . N("For technical reason, in case of multiple boot image, it's more simple to boot network computer through a kernel (vmlinuz), and provide one file with all drivers needed (in our case all.rdz).") . "\n\n" . N("Path to all.rdz: provide the full path to all.rdz image") . "\n\n" . N("PXE name: the name displayed in PXE menu (please provide a word or a number, with no space)"),
 			     data => [
 				      { label => "PXE name:", val => \$o->{var}{PXENAME} },
 				      { label => "PXE description:", val => \$o->{var}{DESCR} },
@@ -152,22 +153,22 @@ $o->{pages} = {
 			     next => 'summaryaddrdz',
 			    },
 	       removeimg => {
-			     name => N("Remove a boot image") . "\n\n" . N("Choose PXE boot image you want to remove from PXE server."),
+			     name => N("Remove a boot image") . "\n\n" . N("Please choose the PXE boot image you want to remove from PXE server.") . "\n\n" . N("The PXE boot image, and the related entry in PXE menu will be deleted."),
 			     data => [
 				      { label => N("Boot image to remove:"), val => \$o->{var}{IMGTOREMOVE}, fixed_list => \@list_menu },
 				     ],
 			     next => 'summaryremove',
 			    },
 	       modifyimg => {
-			     name => N("Add option to boot image:") . "\n\n" . N("Please choose PXE boot image to modify"),
+			     name => N("Add options to boot image") . "\n\n" . N("In some case, you want to add some option to PXE boot image. This wizard provides an easy way to custom boot image with common parameters.") . "\n\n" . N("Please choose, from the list below, the PXE boot image you want to modify"),
 			     data => [
-				      { label => N("Boot image to configure:"), val => \$o->{var}{IMGTOMODIFY}, fixed_list => \@list_menu },
+				      { label => N("Boot image to modify:"), val => \$o->{var}{IMGTOMODIFY}, fixed_list => \@list_menu },
 				     ],
 			     post => \&read_option,
 			     next => 'gomodify',
 			    },
 	       gomodify => {
-			    name => N("Options to add to PXE boot disk") . "\n\n" . N("Server IP: IP address of server which contain installation directory. You can create one with MDK install server wizard.") . "\n" . N("Install directory: full path to MDK install server directory") . "\n" . N("Installation method: choose nfs/http to install via nfs/http."),
+			    name => N("Add option to PXE boot disk") . "\n\n" . N("Server IP: IP address of server, which contain installation directory. You can create one with MDK install server wizard.") . "\n" . N("Install directory: the full path to MDK install server directory") . "\n" . N("Installation method: choose NFS or HTTP."),
 			    data => [
 				     { label => N("Boot image to modify:"), fixed_val => \$o->{var}{i} },
 				     { label => N("Server IP:"), val => \$o->{var}{IP} },
@@ -177,7 +178,7 @@ $o->{pages} = {
 			    next => 'gomodify2',
 			    },
 	       gomodify2 => {
-			     name => N("Network client interface: through which interface client should be installed.") . "\n" . N("Ramsize: adjust ramsize on boot disk.") . "\n" . N("VGA option: if you encounter any problem whith VGA, please adjust. ") . "\n" . N("ACPI option: Advanced Configuration and Power Interface"),
+			     name => N("Network client interface: which interface client should used to be installed.") . "\n" . N("Ramsize: adjust the ramsize parameter on boot disk.") . "\n" . N("VGA option: if you encounter any problem whith VGA, please adjust. ") . "\n" . N("ACPI option: Advanced Configuration and Power Interface"),
 			     data => [
 				      { label => N("Network client interface:"), val => \$o->{var}{ETH}, fixed_list => \@list_eth },
 				      { label => N("Ramsize:"), val => \$o->{var}{RAM}, fixed_list => \@list_ram },
@@ -189,11 +190,11 @@ $o->{pages} = {
 			     next => 'summarymodify',
 			   },
 	       pxeserver => {
-			     name => N("Set PXE server") . "\n\n" . N("We need to use a special dhcpd.conf with PXE parameter.") . "\n" . N("This will configure all needed default configurations files to set a PXE server."),
+			     name => N("Set PXE server") . "\n\n" . N("We need to use a special dhcpd.conf with PXE parameter. To set such a DHCP server, launch drakwizard DHPC, and check the box 'enable PXE', if you don't do that, PXE query will not be answered by this server.") . "\n" . N("Now the wizard will configure all needed default configurations files to allow computers to boot through the network."),
 			     next => 'summaryserver',
 			    },
 	       error_img => {
-			     name => N("Please provide a bootable image..."),
+			     name => N("Please provide a bootable image. To boot through network, network computer need a boot image."),
 			     next => 'addimg',
 			    },
 	       needimg => {
@@ -205,7 +206,7 @@ $o->{pages} = {
 			   },
 			  },
 	       error_imgrdz => {
-			     name => N("Please provide a bootable image..."),
+			     name => N("Please provide an all.rdz image, wich contain all drivers. You can find one in first CD of Mandrakesoft product, in /isolinux/alt0/ directory."),
 			     next => 'addimgrdz',
 			    },
 	       error_path_img => {
@@ -217,7 +218,7 @@ $o->{pages} = {
 				  next => 'addimgrdz',
 				 },
 	       error_name => {
-			      name => N("Please provide a correct name in PXE entry (one word)."),
+			      name => N("Please provide a correct PXE name: one word or one number with no space."),
 			      next => 'addimg',
 			     },
 	       error_needpxe => {
@@ -226,15 +227,15 @@ $o->{pages} = {
 				  next => 'pxeserver',
 				 },
 	       simmilar_entry => {
-				  name => N("Similar name is already used in PXE menu entry") . "\n\n" . N("Please provide another PXE Menu name"),
+				  name => N("Similar PXE name is already used in PXE menu") . "\n\n" . N("Please provide another one."),
 				  next => 'addimg',
 				 },
 	       simmilar_entryrdz => {
-				  name => N("Similar name is already used in PXE menu entry") . "\n\n" . N("Please provide another PXE Menu name"),
+				  name => N("A similar name is already used in PXE menu") . "\n\n" . N("Please provide another one."),
 				  next => 'addimgrdz',
 				 },
 	       summaryserver => {
-				 name => N("Will now prepare all default files to set the PXE server"),
+				 name => N("The wizard will now prepare all default files to set your PXE server"),
 				 data => [
 					  { label => N("TFTP directory:"), fixed_val => \$TFTPDIR },
 					  { label => N("Boot image path:"), fixed_val => \$IMGPATH },
@@ -245,7 +246,7 @@ $o->{pages} = {
 				 next => 'endserver',
 				},
 	       summarymodify => {
-				 name => N("Will now modify boot options in image"),
+				 name => N("The wizard will now modify boot options with those parameters:"),
 				 data => [
 					  { label => N("Boot image to modify:"), fixed_val => \$o->{var}{i} },
 					  { label => N("Server IP:"), fixed_val => \$o->{var}{IP} },
@@ -262,7 +263,7 @@ $o->{pages} = {
 				 next => 'endmodify',
 				},
 	       summaryremove => {
-				 name => N("Will now remove your PXE boot image"),
+				 name => N("The wizard will now remove this PXE boot image"),
 				 data => [
 					  { label => N("PXE entry to remove:"), fixed_val => \$o->{var}{IMGTOREMOVE} },
 					 ],
@@ -270,7 +271,7 @@ $o->{pages} = {
 				 next => 'endremove',
 				},
 	       summaryadd => {
-			      name => N("Will now add your PXE boot image"),
+			      name => N("The wizard Will now add this PXE boot image"),
 				 data => [
 					  { label => "PXE name:", fixed_val => \$o->{var}{PXENAME} },
 					  { label => "PXE description:", fixed_val => \$o->{var}{DESCR} },
@@ -280,7 +281,7 @@ $o->{pages} = {
 			      next => 'endadd',
 			     },
 	       summaryaddrdz => {
-			      name => N("Will now add your PXE boot image"),
+			      name => N("The wizard Will now add this PXE boot image"),
 				 data => [
 					  { label => "PXE name:", fixed_val => \$o->{var}{PXENAME} },
 					  { label => "PXE description:", fixed_val => \$o->{var}{DESCR} },
@@ -292,7 +293,7 @@ $o->{pages} = {
 			     },
 	       endadd => {
 			     name => N("Congratulations"),
-			     data => [ { label => N("The wizard successfully add a PXE boot image.") } ],
+			     data => [ { label => N("The wizard successfully add the PXE boot image.") } ],
 			     post => sub {
 			       @list_menu = ();
 			       foreach (cat_($PXEDEFAULT)) {
@@ -316,7 +317,7 @@ $o->{pages} = {
 			    },
 	       endmodify => {
 			     name => N("Congratulations"),
-			     data => [ { label => N("The wizard successfully modify image(s).") } ],
+			     data => [ { label => N("The wizard successfully modify the boot option.") } ],
                              next => 'welcome',
 			    },
 	       endserver => {
@@ -328,7 +329,7 @@ $o->{pages} = {
 			    },
 	       error_end => {
 			     name => N("Failed"),
-                             data => [ { label => N("Relaunch drakwizard, and try to change some parameters.") } ],
+                             data => [ { label => N("Please relaunch drakwizard, and try to change some parameters.") } ],
                              no_back => 1,
                              end => 1,
                              next => 0,