Code

bugfix: fetch gosa-si-server addresses from dns
authorrettenbe <rettenbe@594d385d-05f5-0310-b6e9-bd551577e9d8>
Fri, 22 Feb 2008 12:35:57 +0000 (12:35 +0000)
committerrettenbe <rettenbe@594d385d-05f5-0310-b6e9-bd551577e9d8>
Fri, 22 Feb 2008 12:35:57 +0000 (12:35 +0000)
git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@9069 594d385d-05f5-0310-b6e9-bd551577e9d8

gosa-si/gosa-si-client

index 9ba139c457db811538ebd1c0696bd060e1a5be8f..9e18182a260f8d8356dba98045ec45c0395e6c85 100755 (executable)
@@ -1381,7 +1381,9 @@ $default_server_key = $server_key;
 
 
 # add gosa-si-server address from config file at first position of server list
-if (defined $server_address) {
+my $server_check_cfg = Config::IniFiles->new( -file => $cfg_file );
+my $server_check = $server_check_cfg->val( "server", "ip");
+if( defined $server_check ) {
     unshift(@servers, $server_address);
     my $servers_string = join(", ", @servers);
     daemon_log("found servers in configuration file: $servers_string", 5);