summaryrefslogtreecommitdiffstats
path: root/client_wizard
diff options
context:
space:
mode:
authorFlorent Villard <warly@mandriva.com>2003-09-05 11:42:20 +0000
committerFlorent Villard <warly@mandriva.com>2003-09-05 11:42:20 +0000
commite4371f18753c98687f71de82810acc79428c51f9 (patch)
tree0fea71ac6b4e25072165c79f2c9e5e0d4ca3f28d /client_wizard
parent8dd32f86a6e97fa103be7155f5784c3dd3166308 (diff)
downloaddrakwizard-e4371f18753c98687f71de82810acc79428c51f9.tar
drakwizard-e4371f18753c98687f71de82810acc79428c51f9.tar.gz
drakwizard-e4371f18753c98687f71de82810acc79428c51f9.tar.bz2
drakwizard-e4371f18753c98687f71de82810acc79428c51f9.tar.xz
drakwizard-e4371f18753c98687f71de82810acc79428c51f9.zip
*** empty log message ***
Diffstat (limited to 'client_wizard')
-rwxr-xr-xclient_wizard/Bind_client.pm7
1 files changed, 3 insertions, 4 deletions
diff --git a/client_wizard/Bind_client.pm b/client_wizard/Bind_client.pm
index a29a6b23..fc7996f3 100755
--- a/client_wizard/Bind_client.pm
+++ b/client_wizard/Bind_client.pm
@@ -36,7 +36,8 @@ my $o = {
client_ip => '',
client_name => ''
},
- needed_rpm => [ ]
+ needed_rpm => [ ],
+ defaultimage => "$ENV{__WIZ_HOME__}client_wizard/images/DNS.png"
};
$o->{pages} = {
@@ -54,7 +55,6 @@ $o->{pages} = {
},
post => \&check,
data => [
- { label => '' },
{ label => N('Name of the machine:'), val => \$o->{var}{client_name} },
{ label => N('IP number of the machine:'), val => \$o->{var}{client_ip} },
],
@@ -79,7 +79,6 @@ $o->{pages} = {
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 => '' },
{ label => N('Client IP:'), fixed_val => \$o->{var}{client_ip} },
],
post => \&do_it,
@@ -146,7 +145,7 @@ sub test {
}
sub do_it {
- $::DEBUG and return;
+ $::testing and return;
my $date = `date`;
chomp($date);
my $wiz_ip_net = "$1.$2.$3.0" if $wiz_ip_server =~ /(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})/;