diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2003-02-25 21:48:25 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2003-02-25 21:48:25 +0000 |
commit | 6a4e6a1641b4c9868998d52c1988134dea0308e5 (patch) | |
tree | f06cc9bf1d342bf1d0566b4f401f105b08371523 /perl-install | |
parent | fed48946fd4f41fbf033de3653a26df1a22bba49 (diff) | |
download | drakx-6a4e6a1641b4c9868998d52c1988134dea0308e5.tar drakx-6a4e6a1641b4c9868998d52c1988134dea0308e5.tar.gz drakx-6a4e6a1641b4c9868998d52c1988134dea0308e5.tar.bz2 drakx-6a4e6a1641b4c9868998d52c1988134dea0308e5.tar.xz drakx-6a4e6a1641b4c9868998d52c1988134dea0308e5.zip |
(read_resolv_conf_raw): fix "search ..." handling
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/network/network.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/network/network.pm b/perl-install/network/network.pm index 1df5e18f1..8ae8abb6a 100644 --- a/perl-install/network/network.pm +++ b/perl-install/network/network.pm @@ -30,7 +30,7 @@ sub read_resolv_conf_raw { my ($file) = @_; $file ||= "$::prefix/etc/resolv.conf"; { nameserver => [ cat_($file) =~ /^\s*nameserver\s+(\S+)/mg ], - search => [ cat_($file) =~ /^\s*search\s+(\S+)/mg ] }; + search => [ if_(cat_($file) =~ /^\s*search\s+(.*)/m, split(' ', $1)) ] }; } sub read_resolv_conf { |