From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Wed, 14 Nov 2001 21:17:02 +0000 (+0000)
Subject: No pod in internal Net::FTP classes.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=bc3d371b41018a16dd7464926e69e0c9989bde44;p=p5sagit%2Fp5-mst-13.2.git

No pod in internal Net::FTP classes.

p4raw-id: //depot/perl@13003
---

diff --git a/pod/buildtoc.PL b/pod/buildtoc.PL
index bb6d0d3..313a3ef 100644
--- a/pod/buildtoc.PL
+++ b/pod/buildtoc.PL
@@ -288,6 +288,7 @@ sub getpods {
 	my $file = $File::Find::name;
 	return if $file eq '../lib/Pod/Functions.pm'; # Used only by pod itself
         return if $file =~ m!lib/Attribute/Handlers/demo/!;
+	return if $file =~ m!lib/Net/FTP/.+\.pm!; # Hi, Graham! :-)
 
 	die "tut $name" if $file =~ /TUT/;
 	unless (open (F, "< $_\0")) {