Remove empty POD sections

diff --git a/lib/B/RecDeparse.pm b/lib/B/RecDeparse.pm
index a075c339ecc5b6885f40a4ff726674accd14fa77..4df9dffb441b183da5acd8a67e64507b6e6f3d76 100644 (file)
--- 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 e46a14aae8680d9da7be00417aeebad6a9d42146..c9f95a569e57ae9d5c95796c673c59b454ec458d 100644 (file)
--- 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
+ > ],
+});