summaryrefslogtreecommitdiffstats
path: root/installsrv_wizard
diff options
context:
space:
mode:
Diffstat (limited to 'installsrv_wizard')
-rw-r--r--installsrv_wizard/Installsrv.pm18
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 {