From ece6b10f982a116c27ddea550b5d07ef318e68e0 Mon Sep 17 00:00:00 2001
From: "lpsolit%gmail.com" <>
Date: Tue, 27 Oct 2009 20:58:30 +0000
Subject: [PATCH] =?utf8?q?Bug=20510246:=20makedocs.pl=20should=20not=20com?=
 =?utf8?q?pile=20POD=20for=20modules=20in=20lib/=20-=20Patch=20by=20Fr?=
 =?utf8?q?=C3=83=C2=A9d=C3=83=C2=A9ric=20Buclin=20<LpSolit@gmail.com>=20r/?=
 =?utf8?q?a=3Dmkanat?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

---
 docs/lib/Pod/Simple/HTMLBatch/Bugzilla.pm | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/docs/lib/Pod/Simple/HTMLBatch/Bugzilla.pm b/docs/lib/Pod/Simple/HTMLBatch/Bugzilla.pm
index c8309d70e1..6cd59b50c0 100644
--- a/docs/lib/Pod/Simple/HTMLBatch/Bugzilla.pm
+++ b/docs/lib/Pod/Simple/HTMLBatch/Bugzilla.pm
@@ -106,4 +106,14 @@ sub note_for_contents_file {
     return $retval;
 }
 
+# Exclude modules being in lib/.
+sub find_all_pods {
+    my($self, $dirs) = @_;
+    my $mod2path = $self->SUPER::find_all_pods($dirs);
+    foreach my $mod (keys %$mod2path) {
+        delete $mod2path->{$mod} if $mod =~ /^lib::/;
+    }
+    return $mod2path;
+}
+
 1;
-- 
2.47.2