summaryrefslogtreecommitdiff
path: root/pod
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2007-11-12 13:30:04 +0000
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2007-11-12 13:30:04 +0000
commit86cf5c171c4d820de48ffb93dd5b659122b9d627 (patch)
tree8dc91a13467da56000c6f24a4b9e931bb299db26 /pod
parent80e5fcd672d15469d5f35615748015a9216f08c3 (diff)
downloadperl-86cf5c171c4d820de48ffb93dd5b659122b9d627.tar.gz
Fix listing of MIME::QuotedPrint in perlmodlib
p4raw-id: //depot/perl@32282
Diffstat (limited to 'pod')
-rw-r--r--pod/perlmodlib.PL5
-rw-r--r--pod/perlmodlib.pod2
2 files changed, 6 insertions, 1 deletions
diff --git a/pod/perlmodlib.PL b/pod/perlmodlib.PL
index a574543e49..b7e5bf3a18 100644
--- a/pod/perlmodlib.PL
+++ b/pod/perlmodlib.PL
@@ -10,6 +10,8 @@ open (MANIFEST, "../MANIFEST") or die $!;
push @MANIFEST, 'lib/Config.pod', 'lib/Errno.pm', 'lib/lib.pm',
'lib/DynaLoader.pm', 'lib/XSLoader.pm';
+-f "../lib/DynaLoader.pm" or die "Must be run from a source tree where perl has been built\n";
+
for (@MANIFEST) {
my $filename;
next unless s|^lib/|| or m|^ext/|;
@@ -49,6 +51,9 @@ for (@MANIFEST) {
$perlname =~ s!\b(\w+)/\1\b!$1!;
$perlname =~ s!/!::!g;
+ # modules with non standard locations
+ $perlname =~ s{Base64::QuotedPrint}{QuotedPrint};
+
($name, $thing) = split / --? /, $title, 2;
unless ($name and $thing) {
diff --git a/pod/perlmodlib.pod b/pod/perlmodlib.pod
index eebeedbd0f..164b9cf076 100644
--- a/pod/perlmodlib.pod
+++ b/pod/perlmodlib.pod
@@ -1093,7 +1093,7 @@ Message objects for Log::Message
Encoding and decoding of base64 strings
-=item MIME::Base64::QuotedPrint
+=item MIME::QuotedPrint
Encoding and decoding of quoted-printable strings