summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lib/Pod/Checker.pm6
-rw-r--r--pod/perlpod.pod11
2 files changed, 13 insertions, 4 deletions
diff --git a/lib/Pod/Checker.pm b/lib/Pod/Checker.pm
index 37ed68f873..35d0186a99 100644
--- a/lib/Pod/Checker.pm
+++ b/lib/Pod/Checker.pm
@@ -150,8 +150,8 @@ C<"">.
=item * Unknown command "I<CMD>"
An invalid POD command has been found. Valid are C<=head1>, C<=head2>,
-C<=over>, C<=item>, C<=back>, C<=begin>, C<=end>, C<=for>, C<=pod>,
-C<=cut>
+C<=head3>, C<=head4>, C<=over>, C<=item>, C<=back>, C<=begin>, C<=end>,
+C<=for>, C<=pod>, C<=cut>
=item * Unknown interior-sequence "I<SEQ>"
@@ -355,6 +355,8 @@ my %VALID_COMMANDS = (
'cut' => 1,
'head1' => 1,
'head2' => 1,
+ 'head3' => 1,
+ 'head4' => 1,
'over' => 1,
'back' => 1,
'item' => 1,
diff --git a/pod/perlpod.pod b/pod/perlpod.pod
index 6c0c5348c4..22a0256961 100644
--- a/pod/perlpod.pod
+++ b/pod/perlpod.pod
@@ -27,6 +27,8 @@ use however it pleases. Currently recognized commands are
=head1 heading
=head2 heading
+ =head3 heading
+ =head4 heading
=item text
=over N
=back
@@ -50,8 +52,13 @@ another paragraph to the doc if you're mixing up code and pod a lot.
=item =head2
-Head1 and head2 produce first and second level headings, with the text in
-the same paragraph as the "=headn" directive forming the heading description.
+=item =head3
+
+=item =head4
+
+Head1, head2, head3 and head4 produce first, second, third and fourth
+level headings, with the text in the same paragraph as the "=headn"
+directive forming the heading description.
=item =over