From 1b813afc2bf39b48c10e71426eb80eb673f23992 Mon Sep 17 00:00:00 2001 From: Erwan Velu Date: Wed, 18 Jun 2003 13:13:01 +0000 Subject: IP forwarder could be empty (pixel) --- perl-install/drakcluster/server_conf.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/drakcluster/server_conf.pm b/perl-install/drakcluster/server_conf.pm index 5ce9f1d09..c4c90056b 100644 --- a/perl-install/drakcluster/server_conf.pm +++ b/perl-install/drakcluster/server_conf.pm @@ -46,7 +46,7 @@ sub fields { [ DOMAINNAME => N("domain name use for administration of node"), check => sub { check_default(@_, $default_conf->{DOMAINNAME}, $current_conf->{DOMAINNAME}) } ], [ NISDOMAINNAME => N("nis domain name use for NIS"), check => \&check_non_empty ], [ DOMAINCOMP => N("domain name use for compute"), check => \&check_non_empty ], - [ IPOFFORWARDER => 'IP of Forwarder resolv ip out of zone ', check => sub { check_ip(@_) || @_ == undef } ], + [ IPOFFORWARDER => 'IP of Forwarder resolv ip out of zone ', check => sub { $_[0] && check_ip(@_) } ], [ DNSKEY => 'dnskey for the dns server', check => \&check_non_empty ], [ ADDSEARCH => 'ADDSEARCH ' . N("is needed if you want your cluster resolv out of zone ip") ], -- cgit v1.2.1