percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-09-03 11:05:48 +00:00
Code Issues Packages Projects Releases Wiki Activity

Make test-bash-tool work with prove. Add .t for remaining bash tools.

Browse Source
This commit is contained in:
Daniel Nichter
2011-07-01 11:18:02 -06:00
parent a9e002cc5a
commit 71574c842f
5 changed files with 92 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
t/pt-mysql-summary/pt-mysql-summary.t
View File

@@ -1,9 +1,17 @@
#!/usr/bin/env perl
#!/usr/bin/evn perl
BEGIN {
die "The PERCONA_TOOLKIT_BRANCH environment variable is not set.\n"
unless $ENV{PERCONA_TOOLKIT_BRANCH} && -d $ENV{PERCONA_TOOLKIT_BRANCH};
unshift @INC, "$ENV{PERCONA_TOOLKIT_BRANCH}/lib";
};
use strict;
use warnings FATAL => 'all';
use English qw(-no_match_vars);
use Test::More;
use MaatkitTest;
print `ls *`;
system("$trunk/util/test-bash-tool pt-mysql-summary @ARGV");
exit;

17
t/pt-pmp/pt-pmp.t Normal file
View File

@@ -0,0 +1,17 @@
#!/usr/bin/evn perl
BEGIN {
die "The PERCONA_TOOLKIT_BRANCH environment variable is not set.\n"
unless $ENV{PERCONA_TOOLKIT_BRANCH} && -d $ENV{PERCONA_TOOLKIT_BRANCH};
unshift @INC, "$ENV{PERCONA_TOOLKIT_BRANCH}/lib";
};
use strict;
use warnings FATAL => 'all';
use English qw(-no_match_vars);
use MaatkitTest;
system("$trunk/util/test-bash-tool pt-pmp @ARGV");
exit;

17
t/pt-summary/pt-summary.t Normal file
View File

@@ -0,0 +1,17 @@
#!/usr/bin/evn perl
BEGIN {
die "The PERCONA_TOOLKIT_BRANCH environment variable is not set.\n"
unless $ENV{PERCONA_TOOLKIT_BRANCH} && -d $ENV{PERCONA_TOOLKIT_BRANCH};
unshift @INC, "$ENV{PERCONA_TOOLKIT_BRANCH}/lib";
};
use strict;
use warnings FATAL => 'all';
use English qw(-no_match_vars);
use MaatkitTest;
system("$trunk/util/test-bash-tool pt-summary @ARGV");
exit;

17
t/pt-usl/pt-usl.t Normal file
View File

@@ -0,0 +1,17 @@
#!/usr/bin/evn perl
BEGIN {
die "The PERCONA_TOOLKIT_BRANCH environment variable is not set.\n"
unless $ENV{PERCONA_TOOLKIT_BRANCH} && -d $ENV{PERCONA_TOOLKIT_BRANCH};
unshift @INC, "$ENV{PERCONA_TOOLKIT_BRANCH}/lib";
};
use strict;
use warnings FATAL => 'all';
use English qw(-no_match_vars);
use MaatkitTest;
system("$trunk/util/test-bash-tool pt-usl @ARGV");
exit;