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.

diff --git a/Porting/release_managers_guide.pod b/Porting/release_managers_guide.pod
index 5df693b..c6224ea 100644 (file)
--- a/Porting/release_managers_guide.pod
+++ b/Porting/release_managers_guide.pod
@@ -457,24 +457,6 @@ and porting tools:
 
 =item *
 
-Check that files managed by F<regen.pl> and friends are up to date. From
-within your working directory:
-
-    $ git status
-    $ make regen_all
-    $ make regen_perly
-    $ git status
-
-If any of the files managed by F<regen.pl> have changed, then you should
-re-make perl to check that it's okay, then commit the updated versions:
-
-    $ git commit -a -m 'make regen; make regen_perly'
-
-(XXX regen might be a problem depending on the bison version available.
-We need to get a wizard to give better instructions on what to do or not do.)
-
-=item *
-
 I<You MUST SKIP this step for SNAPSHOT>
 
 Update C<Module::CoreList> with module version data for the new release.

diff --git a/t/porting/regen.t b/t/porting/regen.t
index edae912..b0efa1f 100644 (file)
--- 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";