Exclude perlfaq1, perlglossary, etc from the list of pragmata - these just pod, not...

diff --git a/pod/perlmodlib.PL b/pod/perlmodlib.PL
index 7423f42..c6b9a70 100644 (file)
--- a/pod/perlmodlib.PL
+++ b/pod/perlmodlib.PL
@@ -20,8 +20,12 @@ require 'regen/regen_lib.pl';
 
 open MANIFEST, '<', 'MANIFEST'
     or die "Can't open MANIFEST: $!";
-my @files = grep m#(?:\.pm|\.pod|_pm\.PL)#, map {s/\s.*//s; $_}
-    grep { m#^(lib|ext|dist|cpan)/# && !m#/(?:t|demo)/# } <MANIFEST>;
+my @files =
+    grep !m#/perl.*\.pod#,
+    grep m#(?:\.pm|\.pod|_pm\.PL)#,
+    map {s/\s.*//s; $_}
+    grep { m#^(lib|ext|dist|cpan)/# && !m#/(?:t|demo)/# }
+    <MANIFEST>;
 close MANIFEST
     or die "$0: failed to close MANIFEST: $!";