diff options
author | Yitzchak Scott-Thoennes <sthoenna@efn.org> | 2002-06-11 08:12:15 -0700 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-06-12 01:39:18 +0000 |
commit | 4d671226b00cf71d187008e5dd16ca943e1adb14 (patch) | |
tree | f1c0857e2222e30080b3708948604286b81cd7ea /pod/perlmodlib.PL | |
parent | 75745e22e13d8864c5073aba44ed9805a466b45e (diff) | |
download | perl-4d671226b00cf71d187008e5dd16ca943e1adb14.tar.gz |
perlmodlib.pod missing Config & Errno
Message-ID: </WnB9gzkgC5S092yn@efn.org>
p4raw-id: //depot/perl@17195
Diffstat (limited to 'pod/perlmodlib.PL')
-rw-r--r-- | pod/perlmodlib.PL | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/pod/perlmodlib.PL b/pod/perlmodlib.PL index b3cf7f4355..fd39e65468 100644 --- a/pod/perlmodlib.PL +++ b/pod/perlmodlib.PL @@ -4,9 +4,12 @@ $ENV{LC_ALL} = 'C'; open (OUT, ">perlmodlib.tmp") or die $!; my (@pragma, @mod, @MANIFEST); + open (MANIFEST, "../MANIFEST") or die $!; +@MANIFEST = grep !m</(?:t|demo)/>, <MANIFEST>; +push @MANIFEST, 'lib/Config.pm', 'lib/Errno.pm'; -while (<MANIFEST>) { +for (@MANIFEST) { my $filename; next unless s|^lib/|| or m|^ext/|; ($filename) = m|^(\S+)|; |