percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-12-25 02:01:13 +08:00
Code Issues Packages Projects Releases Wiki Activity

Fixed error after merging 3.0 branch

Browse Source
This commit is contained in:
Carlos Salguero
2017-12-11 11:01:05 -03:00
parent 7071f7a205
commit a2c9659eda
1 changed files with 0 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
lib/Sandbox.pm
View File

@@ -172,26 +172,6 @@ sub load_file {
$self->wait_for_slaves() unless $args{no_wait};
}
sub has_engine {
my ( $self, $host, $want_engine ) = @_;
# Get the current checksums on the host.
my $dbh = $self->get_dbh_for($host);
my $sql = "SHOW ENGINES";
my @engines = @{$dbh->selectall_arrayref($sql, {Slice => {} })};
# Diff the two sets of checksums: host to master (ref).
my $has_engine=0;
foreach my $engine ( @engines ) {
if ( $engine->{engine} =~ m/$want_engine/i ) {
$has_engine=1;
last;
}
}
return $has_engine;
}
sub _use_for {
my ( $self, $server ) = @_;
return "$self->{basedir}/$port_for{$server}/use";