} 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";
}
$_ = ""; # 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/ : /;