From 7f0e747b8c2f732ea40c4cc072fe5a3c25ec3799 Mon Sep 17 00:00:00 2001
From: Justin Ruggles <justin.ruggles@gmail.com>
Date: Thu, 24 Mar 2011 18:39:19 -0400
Subject: support @heading, @subheading, @subsubheading, and @subsubsection in
 texi2pod.pl

---
 doc/texi2pod.pl | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'doc/texi2pod.pl')

diff --git a/doc/texi2pod.pl b/doc/texi2pod.pl
index aa3273ec1a..84c36ff1e1 100755
--- a/doc/texi2pod.pl
+++ b/doc/texi2pod.pl
@@ -231,10 +231,12 @@ while(<$inf>) {
 
     # Single line command handlers.
 
-    /^\@(?:section|unnumbered|unnumberedsec|center)\s+(.+)$/
+    /^\@(?:section|unnumbered|unnumberedsec|center|heading)\s+(.+)$/
         and $_ = "\n=head2 $1\n";
-    /^\@subsection\s+(.+)$/
+    /^\@(?:subsection|subheading)\s+(.+)$/
         and $_ = "\n=head3 $1\n";
+    /^\@(?:subsubsection|subsubheading)\s+(.+)$/
+        and $_ = "\n=head4 $1\n";
 
     # Block command handlers:
     /^\@itemize\s*(\@[a-z]+|\*|-)?/ and do {
-- 
cgit v1.2.3