From 7d7e44a3aab1b14d80ec9c6ba32dff88d230eb70 Mon Sep 17 00:00:00 2001
From: Nicolas George <george@nsup.org>
Date: Sat, 22 Aug 2020 12:40:56 +0200
Subject: [PATCH] doc/texi2pod: support @float.

---
 doc/texi2pod.pl | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/doc/texi2pod.pl b/doc/texi2pod.pl
index 9a9b34fc15..c7f67afe8c 100644
--- a/doc/texi2pod.pl
+++ b/doc/texi2pod.pl
@@ -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/ : /;