From 813771c0f97c6a5dd2dcc4ed0316e17456f31217 Mon Sep 17 00:00:00 2001
From: Damien Chaumette <dchaumette@mandriva.com>
Date: Mon, 23 Sep 2002 09:44:58 +0000
Subject: fix NULL Gateway IP checking

---
 perl-install/network/network.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/perl-install/network/network.pm b/perl-install/network/network.pm
index 912c4dcc8..b31e36e9f 100644
--- a/perl-install/network/network.pm
+++ b/perl-install/network/network.pm
@@ -372,11 +372,11 @@ You may also enter the IP address of the gateway if you have one"),
 				    ),
 			       ],
 		               complete => sub {
-				   unless (is_ip($netc->{dnsServer})) {
+				   if ($netc->{dnsServer} and !is_ip($netc->{dnsServer})) {
 				       $in->ask_warn('', _("DNS server address should be in format 1.2.3.4"));
 				       return 1;
 				   }
-				   unless (is_ip($netc->{GATEWAY})) {
+				   if ($netc->{GATEWAY} and !is_ip($netc->{GATEWAY})) {
 				       $in->ask_warn('', _("Gateway address should be in format 1.2.3.4"));
 				       return 1;
 				   }
-- 
cgit v1.2.1