diff options
| author | Greg Sabino Mullane | 2010-04-07 18:56:12 +0000 |
|---|---|---|
| committer | Greg Sabino Mullane | 2010-04-07 18:56:12 +0000 |
| commit | aaea6525e939057b623d6402855638d0f732fb8d (patch) | |
| tree | 7fe0aa8f610b1e781a06c54407fb3acfcb2f6ed6 /t/00_test_tester.t | |
| parent | 603ef5803d9afdf82de82665ae703dd967458d10 (diff) | |
Complete the tabs-to-spaces conversion.
Diffstat (limited to 't/00_test_tester.t')
| -rw-r--r-- | t/00_test_tester.t | 26 |
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; |
