PT-63 WIP

This commit is contained in:
Carlos Salguero
2017-03-29 14:56:04 -03:00
parent 2ebd886289
commit cd23d7b163

View File

@@ -8504,11 +8504,13 @@ sub main {
$slave_lag_cxns = $slaves; $slave_lag_cxns = $slaves;
} }
if ($o->get('skip-check-slave-lag')) { if ($o->get('skip-check-slave-lag')) {
my $servers_to_skip = $o->get('skip-check-slave-lag'); my $slaves_to_skip = $o->get('skip-check-slave-lag');
my $filtered_slaves = []; my $filtered_slaves = [];
warn "------------------------------------------------"; for my $slave_to_skip (@$slaves_to_skip) {
warn Data::Dumper::Dumper($o->get('skip-check-slave-lag'));
warn "------------------------------------------------"; warn "i>>>>------------------------------------------------";
warn Data::Dumper::Dumper($slave_to_skip->{h});
}
} }
if ( $slave_lag_cxns && scalar @$slave_lag_cxns ) { if ( $slave_lag_cxns && scalar @$slave_lag_cxns ) {
print "Will check slave lag on:\n"; print "Will check slave lag on:\n";