mirror of
https://github.com/percona/percona-toolkit.git
synced 2025-09-27 16:12:04 +00:00
PT-63 WIP
This commit is contained in:
@@ -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";
|
||||||
|
Reference in New Issue
Block a user