quiet warning caused by server_up being undef for false
This commit is contained in:
parent
308236b4ad
commit
f0a8595e50
|
@ -83,7 +83,7 @@ if ( $options{command} ) {
|
||||||
my $tries = 10;
|
my $tries = 10;
|
||||||
my $server_up;
|
my $server_up;
|
||||||
while ( $tries and ! ( $server_up = connect(CLIENT, $saddr) ) ) {
|
while ( $tries and ! ( $server_up = connect(CLIENT, $saddr) ) ) {
|
||||||
Debug("Failed to connect to $server_up at $sock_file");
|
Debug("Failed to connect to zmcontrol server at $sock_file");
|
||||||
runCommand("zmdc.pl start zmcontrol.pl --id=$id");
|
runCommand("zmdc.pl start zmcontrol.pl --id=$id");
|
||||||
sleep 1;
|
sleep 1;
|
||||||
$tries -= 1;
|
$tries -= 1;
|
||||||
|
|
Loading…
Reference in New Issue