diff options
author | Pascal Rigaux <pixel@mandriva.com> | 1999-10-10 22:36:46 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 1999-10-10 22:36:46 +0000 |
commit | de08b3c99e81030d1455dc7b3bf869559a234495 (patch) | |
tree | 71639bb74323bb82e7203d84511e8b81702ca2fa /perl-install/network.pm | |
parent | eaf1f7e94354b3bf37db6864de8364ffbda223f7 (diff) | |
download | drakx-de08b3c99e81030d1455dc7b3bf869559a234495.tar drakx-de08b3c99e81030d1455dc7b3bf869559a234495.tar.gz drakx-de08b3c99e81030d1455dc7b3bf869559a234495.tar.bz2 drakx-de08b3c99e81030d1455dc7b3bf869559a234495.tar.xz drakx-de08b3c99e81030d1455dc7b3bf869559a234495.zip |
no_comment
Diffstat (limited to 'perl-install/network.pm')
-rw-r--r-- | perl-install/network.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/network.pm b/perl-install/network.pm index 31fcd7e0f..c5d1b6a97 100644 --- a/perl-install/network.pm +++ b/perl-install/network.pm @@ -107,6 +107,7 @@ sub add2hosts { log::l("writing host information to $file"); open F, ">$file" or die "cannot write $file: $!"; while (my ($ip, $v) = each %l) { + $ip or next; print F "$ip"; if ($v =~ /^\s/) { print F $v; |