summaryrefslogtreecommitdiffstats
path: root/installsrv_wizard
diff options
context:
space:
mode:
Diffstat (limited to 'installsrv_wizard')
-rw-r--r--installsrv_wizard/Installsrv.pm29
1 files changed, 14 insertions, 15 deletions
diff --git a/installsrv_wizard/Installsrv.pm b/installsrv_wizard/Installsrv.pm
index 957a1d08..48018700 100644
--- a/installsrv_wizard/Installsrv.pm
+++ b/installsrv_wizard/Installsrv.pm
@@ -1,6 +1,6 @@
# version 0.2
#
-# Copyright (C) 2002,2003 Mandrakesoft
+# Copyright (C) 2004 Mandrakesoft
#
# Author: aginies _at_ mandrakesoft.com
#
@@ -21,7 +21,6 @@
package MDK::Wizard::Installsrv;
use lib qw(/usr/lib/libDrakX);
-use ugtk2;
use strict;
use standalone;
use common;
@@ -38,7 +37,7 @@ my $NFSEXPORTS = "/etc/exports";
my $WWWDIR = "/var/www/html";
my $o = {
- name => 'Install Server Wizard',
+ name => 'MDK Install Server Wizard',
var => {
DESTDIR => '/var/install/i',
SOURCEDIR => '/tmp/i/',
@@ -49,21 +48,21 @@ my $o = {
$o->{pages} = {
welcome => {
- name => N("Configure an install server (via NFS and http)") . "\n\n" . N("Easily configure a Mandrake server installation directory, with nfs export and http access."),
+ name => N("Configure a MDK install server (via NFS and http)") . "\n\n" . N("Easily configure a Mandrake server installation directory, with nfs export 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 an Mandrake installtion.") . "\n\n" . N("Destination Directory: copy file in wich directory ?"),
+ name => N("Install server configuration") . "\n\n" . N("Path to data: specify your source directory (should be base of an Mandrake installation.") . "\n\n" . N("Destination directory: copy file in wich 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 => 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} },
+ { label => "Path to data:", val => \$o->{var}{SOURCEDIR} },
+ { label => "Destination directory:", val => \$o->{var}{DESTDIR} },
+ { 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} },
],
post => \&test_data,
next => 'summary_srv',
@@ -73,11 +72,11 @@ $o->{pages} = {
next => 'install_srv',
},
error_dir => {
- name => N("Error, Source directory must be a directory with full Mandrake installation directory."),
+ name => N("Error, source directory must be a directory with full Mandrake installation directory."),
next => 'install_srv',
},
dir_already_use => {
- name => N("Destination Directory already in use, please choose another one."),
+ name => N("Destination directory already in use, please choose another one."),
next => 'install_srv',
},
summary_srv => {
@@ -87,10 +86,10 @@ $o->{pages} = {
$o->{var}{http} = $o->{var}{wiz_http} ? N("enabled") : N("disabled");
},
data => [
- { label => "Path to data", fixed_val => \$o->{var}{SOURCEDIR} },
- { label => "Destination Directory:", fixed_val => \$o->{var}{DESTDIR} },
- { label => N("Enable nfs install server"), fixed_val => \$o->{var}{nfs} },
- { label => N("Enable http install server"), fixed_val => \$o->{var}{http} },
+ { label => "Path to data:", fixed_val => \$o->{var}{SOURCEDIR} },
+ { label => "Destination directory:", fixed_val => \$o->{var}{DESTDIR} },
+ { label => N("Enable NFS install server:"), fixed_val => \$o->{var}{nfs} },
+ { label => N("Enable HTTP install server:"), fixed_val => \$o->{var}{http} },
],
post => \&do_it,
next => 'end',