summaryrefslogtreecommitdiff
path: root/t/00_test_tester.t
diff options
context:
space:
mode:
authorGreg Sabino Mullane2010-04-07 18:56:12 +0000
committerGreg Sabino Mullane2010-04-07 18:56:12 +0000
commitaaea6525e939057b623d6402855638d0f732fb8d (patch)
tree7fe0aa8f610b1e781a06c54407fb3acfcb2f6ed6 /t/00_test_tester.t
parent603ef5803d9afdf82de82665ae703dd967458d10 (diff)
Complete the tabs-to-spaces conversion.
Diffstat (limited to 't/00_test_tester.t')
-rw-r--r--t/00_test_tester.t26
1 files changed, 13 insertions, 13 deletions
diff --git a/t/00_test_tester.t b/t/00_test_tester.t
index 150c6db3a..20ef2e0d2 100644
--- a/t/00_test_tester.t
+++ b/t/00_test_tester.t
@@ -20,28 +20,28 @@ $info = $cp->run('help','--help');
my %action;
for my $line (split /\n/ => $info) {
- next if $line !~ /^ (\w+) +\- [A-Z]/;
- $action{$1}++;
+ next if $line !~ /^ (\w+) +\- [A-Z]/;
+ $action{$1}++;
}
my $ok = 1;
for my $act (sort keys %action) {
- ## Special known exceptions
- next if $act eq 'table_size' or $act eq 'index_size';
- next if $act eq 'last_autoanalyze' or $act eq 'last_autovacuum';
-
- my $file = "t/02_$act.t";
- if (! -e $file) {
- diag qq{No matching test file found for action "$act" (expected $file)\n};
- $ok = 0;
- }
+ ## Special known exceptions
+ next if $act eq 'table_size' or $act eq 'index_size';
+ next if $act eq 'last_autoanalyze' or $act eq 'last_autovacuum';
+
+ my $file = "t/02_$act.t";
+ if (! -e $file) {
+ diag qq{No matching test file found for action "$act" (expected $file)\n};
+ $ok = 0;
+ }
}
if ($ok) {
- pass 'There is a test for every action';
+ pass 'There is a test for every action';
}
else {
- fail 'Did not find a test for every action';
+ fail 'Did not find a test for every action';
}
exit;