← Back to branch summary

~percona-toolkit-dev/percona-toolkit/release-2.2.2

« back to all changes in this revision

Viewing changes to t/pt-mext/pt-mext.t

Merge version-in-all-bash-tools-bug-821502.

Show diffs side-by-side

added added

removed removed

Lines of Context:
t/pt-mext/pt-mext.t
9
9
use strict;
10
10
use warnings FATAL => 'all';
11
11
use English qw(-no_match_vars);
12
 
use Test::More tests => 1;
 
12
use Test::More;
13
13
 
14
14
use PerconaTest;
15
15
 
19
19
   'It runs'
20
20
);
21
21
 
 
22
my $cmd    = "$trunk/bin/pt-mext";
 
23
my $sample = "$trunk/t/pt-mext/samples";
 
24
 
 
25
ok(
 
26
   no_diff(
 
27
      "$cmd -- cat $sample/mext-001.txt",
 
28
      "t/pt-mext/samples/mext-001-result.txt",
 
29
   ),
 
30
   "mext-001"
 
31
) or diag($test_diff);
 
32
 
 
33
ok(
 
34
   no_diff(
 
35
      "$cmd -r -- cat $sample/mext-002.txt",
 
36
      "t/pt-mext/samples/mext-002-result.txt",
 
37
   ),
 
38
   "mext-002 -r"
 
39
) or diag($test_diff);
 
40
 
22
41
# #############################################################################
23
42
# Done.
24
43
# #############################################################################
 
44
done_testing;
25
45
exit;