OSDN Git Service

2007-02-16 Matthias Klose <doko@debian.org>
authordoko <doko@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 16 Feb 2007 01:02:57 +0000 (01:02 +0000)
committerdoko <doko@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 16 Feb 2007 01:02:57 +0000 (01:02 +0000)
        * texi2pod.pl: Handle @subsubsection, ignore @anchor.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@122026 138bc75d-0d04-0410-961f-82ee72b054a4

contrib/ChangeLog
contrib/texi2pod.pl

index 7405f44..5353552 100644 (file)
@@ -1,3 +1,7 @@
+2007-02-16  Matthias Klose  <doko@debian.org>
+
+       * texi2pod.pl: Handle @subsubsection, ignore @anchor.
+
 2007-02-10  Hans-Peter Nilsson  <hp@axis.com>
 
        * test_summary (configflags): Adjust for changes in the
 2007-02-10  Hans-Peter Nilsson  <hp@axis.com>
 
        * test_summary (configflags): Adjust for changes in the
index 2791cdd..e7b983b 100755 (executable)
@@ -254,6 +254,8 @@ while(<$inf>) {
        and $_ = "\n=head2 $1\n";
     /^\@subsection\s+(.+)$/
        and $_ = "\n=head3 $1\n";
        and $_ = "\n=head2 $1\n";
     /^\@subsection\s+(.+)$/
        and $_ = "\n=head3 $1\n";
+    /^\@subsubsection\s+(.+)$/
+       and $_ = "\n=head4 $1\n";
 
     # Block command handlers:
     /^\@itemize(?:\s+(\@[a-z]+|\*|-))?/ and do {
 
     # Block command handlers:
     /^\@itemize(?:\s+(\@[a-z]+|\*|-))?/ and do {
@@ -400,6 +402,9 @@ sub postprocess
     s/\@gol//g;
     s/\@\*\s*\n?//g;
 
     s/\@gol//g;
     s/\@\*\s*\n?//g;
 
+    # Anchors are thrown away
+    s/\@anchor\{(?:[^\}]*)\}//g;
+
     # @uref can take one, two, or three arguments, with different
     # semantics each time.  @url and @email are just like @uref with
     # one argument, for our purposes.
     # @uref can take one, two, or three arguments, with different
     # semantics each time.  @url and @email are just like @uref with
     # one argument, for our purposes.