X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=pod%2Fbuildtoc;h=d657d68c848f7362fb8ce570b37de44908def00a;hb=1b1626e441fa9750f3953e46530f2e95046bb007;hp=b0e514ee05d72ab0b87d37e67b738418466848a4;hpb=774d564bb7dd1ed64ca0d7e534aa67e93f991f02;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/pod/buildtoc b/pod/buildtoc
index b0e514e..d657d68 100644
--- a/pod/buildtoc
+++ b/pod/buildtoc
@@ -5,11 +5,13 @@ use Text::Wrap;
 sub output ($);
 
 @pods = qw(
-	    perl perldelta perldata perlsyn perlop perlre perlrun perlfunc
-	    perlvar perlsub perlmod perlform perllocale perlref perldsc
-	    perllol perltoot perlobj perltie perlbot perlipc perldebug
-	    perldiag perlsec perltrap perlstyle perlpod perlbook perlembed
-	    perlapio perlxs perlxstut perlguts perlcall
+	   perl perlfaq perlfaq1 perlfaq2 perlfaq3 perlfaq4 perlfaq5
+	   perlfaq6 perlfaq7 perlfaq8 perlfaq9 perldelta perldata
+	   perlsyn perlop perlre perlrun perlfunc perlvar perlsub
+	   perlmod perlmodlib perlform perllocale perlref perldsc
+	   perllol perltoot perlobj perltie perlbot perlipc perldebug
+	   perldiag perlsec perltrap perlstyle perlpod perlbook
+	   perlembed perlapio perlxs perlxstut perlguts perlcall
 	  );
 
 for (@pods) { s/$/.pod/ }
@@ -130,7 +132,7 @@ podset( @modules[ sort { $modname[$a] cmp $modname[$b] } 0 .. $#modules ] );
 
 	=head1 AUTHOR
 
-	Larry Wall E<lt>F<larry\@wall.org>E<gt>, with the help of oodles
+	Larry Wall <F<larry\@wall.org>>, with the help of oodles
 	of other folks.
 
 
@@ -175,7 +177,7 @@ sub podset {
 	    s/^\s*\*\s*//;
 	    s/\s+$//;
 	    next if /^[\d.]+$/;
-	    next if $pod eq 'perlmod' && /^ftp:/;
+	    next if $pod eq 'perlmodlib' && /^ftp:/;
 	    ##print "=over\n\n" unless $initem;
 	    output ", " if $initem;
 	    $initem = 1;