mirror of
https://github.com/percona/percona-toolkit.git
synced 2025-09-26 23:45:44 +00:00
Add and test --[no]stalk to pt-stalk. Fix ps in pt-stalk tests. Add PerconaTest::wait_for_sh().
This commit is contained in:
@@ -287,6 +287,16 @@ sub wait_for_files {
|
||||
);
|
||||
}
|
||||
|
||||
sub wait_for_sh {
|
||||
my ($cmd) = @_;
|
||||
return wait_until(
|
||||
sub {
|
||||
my $retval = system("$cmd 2>/dev/null");
|
||||
return $retval >> 8 == 0 ? 1 : 0;
|
||||
}
|
||||
);
|
||||
};
|
||||
|
||||
sub _read {
|
||||
my ( $fh ) = @_;
|
||||
return <$fh>;
|
||||
|
Reference in New Issue
Block a user