From: Vincent Pit <vince@profvince.com>
Date: Fri, 23 Aug 2013 17:17:28 +0000 (-0300)
Subject: Remove empty POD sections
X-Git-Tag: v0.08~5
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=7dfb54498a29abb83ba502c4f7dfae65d090aecf;p=perl%2Fmodules%2FB-RecDeparse.git

Remove empty POD sections
---

diff --git a/lib/B/RecDeparse.pm b/lib/B/RecDeparse.pm
index a075c33..4df9dff 100644
--- a/lib/B/RecDeparse.pm
+++ b/lib/B/RecDeparse.pm
@@ -219,20 +219,37 @@ sub pp_gv {
  return $body;
 }
 
-=head2 C<compile>
+=pod
 
-=head2 C<init>
+The following functions and methods from L<B::Deparse> are reimplemented by this module :
 
-=head2 C<deparse_sub>
+=over 4
 
-=head2 C<pp_entersub>
+=item *
 
-=head2 C<pp_refgen>
+C<compile>
 
-=head2 C<pp_gv>
+=item *
 
-Functions and methods from L<B::Deparse> reimplemented by this module.
-Never call them directly.
+C<init>
+
+=item *
+
+C<deparse_sub>
+
+=item *
+
+C<pp_entersub>
+
+=item *
+
+C<pp_refgen>
+
+=item *
+
+C<pp_gv>
+
+=back
 
 Otherwise, L<B::RecDeparse> inherits all methods from L<B::Deparse>.
 
diff --git a/t/92-pod-coverage.t b/t/92-pod-coverage.t
index e46a14a..c9f95a5 100644
--- a/t/92-pod-coverage.t
+++ b/t/92-pod-coverage.t
@@ -13,4 +13,13 @@ load_or_skip_all('Pod::Coverage',       '0.18'     );
 
 eval 'use Test::Pod::Coverage'; # Make Kwalitee test happy
 
-all_pod_coverage_ok();
+all_pod_coverage_ok({
+ also_private => [ qw<
+  compile
+  deparse_sub
+  init
+  pp_entersub
+  pp_gv
+  pp_refgen
+ > ],
+});