[FFmpeg-cvslog] doc: support multitable in texi2pod
Luca Barbato
git at videolan.org
Sat Jan 26 13:43:50 CET 2013
ffmpeg | branch: master | Luca Barbato <lu_zero at gentoo.org> | Wed Jan 23 11:43:37 2013 +0100| [5ea5ffc9cee1b91eed471fff2f51d771222cf8d2] | committer: Luca Barbato
doc: support multitable in texi2pod
> http://git.videolan.org/gitweb.cgi/ffmpeg.git/?a=commit;h=5ea5ffc9cee1b91eed471fff2f51d771222cf8d2
---
doc/texi2pod.pl | 20 ++++++++++++++++++--
1 file changed, 18 insertions(+), 2 deletions(-)
diff --git a/doc/texi2pod.pl b/doc/texi2pod.pl
index 94323be..96d967b 100755
--- a/doc/texi2pod.pl
+++ b/doc/texi2pod.pl
@@ -161,7 +161,7 @@ INF: while(<$inf>) {
} elsif ($ended =~ /^(?:example|smallexample|display)$/) {
$shift = "";
$_ = ""; # need a paragraph break
- } elsif ($ended =~ /^(?:itemize|enumerate|[fv]?table)$/) {
+ } elsif ($ended =~ /^(?:itemize|enumerate|(?:multi|[fv])?table)$/) {
$_ = "\n=back\n";
$ic = pop @icstack;
} else {
@@ -262,7 +262,7 @@ INF: while(<$inf>) {
$endw = "enumerate";
};
- /^\@([fv]?table)\s+(\@[a-z]+)/ and do {
+ /^\@((?:multi|[fv])?table)\s+(\@[a-z]+)/ and do {
push @endwstack, $endw;
push @icstack, $ic;
$endw = $1;
@@ -271,6 +271,7 @@ INF: while(<$inf>) {
$ic =~ s/\@(?:code|kbd)/C/;
$ic =~ s/\@(?:dfn|var|emph|cite|i)/I/;
$ic =~ s/\@(?:file)/F/;
+ $ic =~ s/\@(?:columnfractions)//;
$_ = "\n=over 4\n";
};
@@ -281,6 +282,21 @@ INF: while(<$inf>) {
$_ = ""; # need a paragraph break
};
+ /^\@item\s+(.*\S)\s*$/ and $endw eq "multitable" and do {
+ my $columns = $1;
+ $columns =~ s/\@tab/ : /;
+
+ $_ = "\n=item B<". $columns .">\n";
+ };
+
+ /^\@tab\s+(.*\S)\s*$/ and $endw eq "multitable" and do {
+ my $columns = $1;
+ $columns =~ s/\@tab/ : /;
+
+ $_ = " : ". $columns;
+ $section =~ s/\n+\s+$//;
+ };
+
/^\@itemx?\s*(.+)?$/ and do {
if (defined $1) {
# Entity escapes prevent munging by the <> processing below.
More information about the ffmpeg-cvslog
mailing list