diff options
| author | Nicholas Clark <nick@ccl4.org> | 2011-01-23 18:42:39 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2011-01-23 18:45:59 +0000 |
| commit | b7c35859c822f149e6f6e2de9f615f2ea2909209 (patch) | |
| tree | c082bea850e76f9b7bc1d7e33fb74ed44583e8ff /t/porting/regen.t | |
| parent | c24c946d24c97d98baecdbf2c37823b55add8bcb (diff) | |
| download | perl-b7c35859c822f149e6f6e2de9f615f2ea2909209.tar.gz | |
t/porting/regen.t can test that META.yml is up to date.
As Porting/makemeta uses regen_lib.pl and rename_if_different(), all that is
needed is to pass it --tap on the command line.
t/porting/regen.t now tests that all files mentioned in the release managers
guide are up to date (and tests will fail if they are not), hence there is now
no need for the release manager to explicitly test that generated files are
not stale.
Diffstat (limited to 't/porting/regen.t')
| -rw-r--r-- | t/porting/regen.t | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/t/porting/regen.t b/t/porting/regen.t index edae912a75..b0efa1f63a 100644 --- a/t/porting/regen.t +++ b/t/porting/regen.t @@ -26,7 +26,7 @@ $::NO_ENDING = $::NO_ENDING = 1; my $in_regen_pl = 18; # I can't see a clean way to calculate this automatically. my @files = qw(perly.act perly.h perly.tab); -plan (tests => $in_regen_pl + @files); +plan (tests => 1 + $in_regen_pl + @files); OUTER: foreach my $file (@files) { open my $fh, '<', $file or die "Can't open $file: $!"; @@ -51,3 +51,4 @@ OUTER: foreach my $file (@files) { } system "$^X regen.pl --tap"; +system "$^X Porting/makemeta --tap"; |