Browse Source

doc/texi2pod: support @float.

tags/n4.4
Nicolas George 4 years ago
parent
commit
7d7e44a3aa
1 changed files with 9 additions and 0 deletions
  1. +9
    -0
      doc/texi2pod.pl

+ 9
- 0
doc/texi2pod.pl View File

@@ -172,6 +172,9 @@ INF: while(<$inf>) {
} elsif ($ended =~ /^(?:itemize|enumerate|(?:multi|[fv])?table)$/) {
$_ = "\n=back\n";
$ic = pop @icstack;
} elsif ($ended =~ /^float$/) {
$_ = "\n=back\n";
$ic = pop @icstack;
} else {
die "unknown command \@end $ended at line $.\n";
}
@@ -297,6 +300,12 @@ INF: while(<$inf>) {
$_ = ""; # need a paragraph break
};

/^\@(float)\s+\w+/ and do {
push @endwstack, $endw;
$endw = $1;
$_ = "\n=over 4\n";
};

/^\@item\s+(.*\S)\s*$/ and $endw eq "multitable" and do {
my $columns = $1;
$columns =~ s/\@tab/ : /;


Loading…
Cancel
Save