Code

Removed duplicated dns domains
authorcajus <cajus@594d385d-05f5-0310-b6e9-bd551577e9d8>
Tue, 26 Feb 2008 11:01:26 +0000 (11:01 +0000)
committercajus <cajus@594d385d-05f5-0310-b6e9-bd551577e9d8>
Tue, 26 Feb 2008 11:01:26 +0000 (11:01 +0000)
git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@9125 594d385d-05f5-0310-b6e9-bd551577e9d8

gosa-si/gosa-si-client

index eef48fdfa9ebdd7c76aeb0a7c458f0cd8eb40fcc..9aaa5db31995657ab6f0fb7189b88af297bcc3a0 100755 (executable)
@@ -1149,29 +1149,6 @@ sub server_input {
     return;
 }
 
-sub get_dns_domains() {
-        my $line;
-        my @searches;
-        open(RESOLV, "</etc/resolv.conf");
-        while(<RESOLV>){
-                $line= $_;
-                chomp $line;
-                $line =~ s/^\s+//;
-                $line =~ s/\s+$//;
-                $line =~ s/\s+/ /;
-                if ($line =~ /^domain (.*)$/ ){
-                        push(@searches, $1);
-                } elsif ($line =~ /^search (.*)$/ ){
-                        push(@searches, split(/ /, $1));
-                }
-        }
-        close(RESOLV);
-
-        my %tmp = map { $_ => 1 } @searches;
-        @searches = sort keys %tmp;
-
-        return @searches;
-}
 
 #==== MAIN = main ==============================================================
 #  parse commandline options