add help and some information

1 files changed, 9 insertions, 9 deletions

diff --git a/installsrv_wizard/Installsrv.pm b/installsrv_wizard/Installsrv.pm
index a70a60db..3acc237f 100644
--- a/installsrv_wizard/Installsrv.pm
+++ b/installsrv_wizard/Installsrv.pm
@@ -44,25 +44,25 @@ my $o = {
 		 DESTDIR => '/var/install/clic',
 		 SOURCEDIR => '/home/nis/install/clic',
 		},
-	 needed_rpm => [ 'nfs-utils', 'apache2' ],
+	 needed_rpm => [ 'nfs-utils', 'apache-mpm-prefork' ],
 	 defaultimage => "$ENV{__WIZ_HOME__}/installsrv_wizard/images/Install.png"
 	};
 
 $o->{pages} = {
 	       welcome => {
-			   name => N("Configure an install server (via NFS and http)") . "\n\n" . N("Easily configure a server installation directory, with NFS and HTTP access."),
+			   name => N("Configure an install server (via NFS and HTTP)") . "\n\n" . N("Easily configure a server installation directory, with NFS and HTTP access."),
 			   no_back => 1,
 			   next => 'install_srv',
 			  },
 	       install_srv => {
-			       name => N("Install server configuration") . "\n\n" . N("Path to data: specify your source directory, should be base of a Linux installation.") . "\n\n" . N("Destination directory: copy file in which directory?"),
+			       name => N("Install server configuration") . "\n\n" . N("Path to data: specify your source directory, should be base of a Linux installation.") . "\n\n" . N("Destination directory: copy files in which directory ?"),
 			       pre => sub {
 				 $o->{var}{wiz_nfs} ||= 1;
 				 $o->{var}{wiz_http} ||= 1;
 			       },
 			       data => [
-					{ label => "Path to data:", val => \$o->{var}{SOURCEDIR} },
-					{ label => "Destination directory:", val => \$o->{var}{DESTDIR} },
+					{ label => "Path to data:", val => \$o->{var}{SOURCEDIR}, help => N("Please provide path to Mandriva installation disk") },
+					{ label => "Destination directory:", val => \$o->{var}{DESTDIR}, help => N("Files will be copied in this place.") },
 #					{ label => N("Enable NFS install server:"), type => 'bool', val => \$o->{var}{wiz_nfs} },
 #					{ label => N("Enable HTTP  install server:"), type => 'bool', val => \$o->{var}{wiz_http} },
 				       ],
@@ -102,7 +102,7 @@ $o->{pages} = {
 			next => 'end',
 		       },
 	       end => {
-		       name => N("Congratulations, Install server is now ready. You can now configure a DHCP server with PXE support, and a PXE server. So it will be very easy to install Linux through a network."),
+		       name => N("Congratulations, Install server is now ready. You can now configure a DHCP server with PXE support, and a PXE server. So it will be very easy to install Linux through a network. Use drakpxelinux to configure your PXE server, and drakwizard DHCP to configure a DHCPD server."),
 		       end => 1,
 		       no_back => 1,
 		       next => 0
@@ -135,7 +135,7 @@ sub add_http_link {
   if (! -f $LINK) {
     symlink $PATH, $LINK;
   }
-  check_started("httpd")
+  check_started("httpd");
 }
 
 sub cp_data {
@@ -147,7 +147,7 @@ sub cp_data {
 sub do_it {
   return if $::testing;
   my $in = 'interactive'->vnew('su', 'install');
-  my $w = $in->wait_message(N("Copying data"), N("Configuring your system as Linux install server..."));
+  my $w = $in->wait_message(N("Copying data"), N("Configuring your system as Linux install server via NFS or HTTP, this can take a while, so be patient please..."));
   my $S = $o->{var}{SOURCEDIR};
   my $D = $o->{var}{DESTDIR};
   if (! -d $D) { mkdir_p($D) }
@@ -156,7 +156,7 @@ sub do_it {
   add_http_link($o->{var}{DESTDIR});
   undef $w;
 }
-  
+
 sub new {
     my ($class) = @_;
     bless {