diff options
| author | Francois Pons <fpons@mandriva.com> | 2000-09-01 12:36:09 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2000-09-01 12:36:09 +0000 |
| commit | 0c928ac011478e29c10950a8f21e4bd7140e2a63 (patch) | |
| tree | e6ef28ecbe9d82ee895543842ff97fb69f1f15ae /perl-install/network.pm | |
| parent | ed0e070f2f50f0c2283651e1de0c9bb6713f3c29 (diff) | |
| download | drakx-0c928ac011478e29c10950a8f21e4bd7140e2a63.tar drakx-0c928ac011478e29c10950a8f21e4bd7140e2a63.tar.gz drakx-0c928ac011478e29c10950a8f21e4bd7140e2a63.tar.bz2 drakx-0c928ac011478e29c10950a8f21e4bd7140e2a63.tar.xz drakx-0c928ac011478e29c10950a8f21e4bd7140e2a63.zip | |
*** empty log message ***
Diffstat (limited to 'perl-install/network.pm')
| -rw-r--r-- | perl-install/network.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/network.pm b/perl-install/network.pm index 7b9558e44..d099ec309 100644 --- a/perl-install/network.pm +++ b/perl-install/network.pm @@ -117,7 +117,7 @@ sub add2hosts { local *F; if (-e $file) { open F, $file or die "cannot open $file: $!"; - /\s*(\S+)(.*)/ and $l{$1} = $2 foreach <F>; + /\s*(\S+)(.*)/ and $l{$1} ||= $2 foreach <F>; } log::l("writing host information to $file"); open F, ">$file" or die "cannot write $file: $!"; |