From 59ef53a2ef3dcf8e68e574d94508ad8b7bcdb377 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Fri, 5 Mar 2004 08:45:26 +0000 Subject: (write_resolv_conf) only remove /etc/resolv.conf if it's really a link (prevent no resolv.conf rewriting when it was empty eg b/c link was dead) --- perl-install/network/network.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-install/network/network.pm b/perl-install/network/network.pm index cccd4767d..37d4e3e2c 100644 --- a/perl-install/network/network.pm +++ b/perl-install/network/network.pm @@ -121,7 +121,7 @@ sub write_resolv_conf { push @unknown, $_; } } - unlink $file; #- workaround situation when /etc/resolv.conf is an absolute link to /etc/ppp/resolv.conf or whatever + unlink $file if -l $file; #- workaround situation when /etc/resolv.conf is an absolute link to /etc/ppp/resolv.conf or whatever if (@{$new{search}} || @{$new{nameserver}}) { $prev{$_} = [ difference2($prev{$_} || [], $new{$_}) ] foreach keys %new; -- cgit v1.2.1