[no subject]

[Patrice Dumas]

branch: master
commit 896428c7f76855cf7f9a65728ee3d92a7cf2720f
Author: Patrice Dumas <pertusus@free.fr>
AuthorDate: Mon Feb 20 17:27:10 2023 +0100

    * tp/Texinfo/Convert/NodeNameNormalization.pm (set_float_types): avoid
    autovivification.
---
 ChangeLog                                   | 5 +++++
 tp/Texinfo/Convert/NodeNameNormalization.pm | 5 +++--
 2 files changed, 8 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 8c837d76c0..77b51c15b3 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2023-02-20  Patrice Dumas  <pertusus@free.fr>
+
+       * tp/Texinfo/Convert/NodeNameNormalization.pm (set_float_types): avoid
+       autovivification.
+
 2023-02-20  Patrice Dumas  <pertusus@free.fr>
 
        * tp/Texinfo/Convert/NodeNameNormalization.pm (_parse_float_type),
diff --git a/tp/Texinfo/Convert/NodeNameNormalization.pm 
b/tp/Texinfo/Convert/NodeNameNormalization.pm
index dd0975f9aa..98911a014c 100644
--- a/tp/Texinfo/Convert/NodeNameNormalization.pm
+++ b/tp/Texinfo/Convert/NodeNameNormalization.pm
@@ -434,10 +434,11 @@ sub set_float_types
 {
   my $self = shift;
 
-  my $global_commands = $self->global_commands_information();
-
   $self->{'floats'} = {};
 
+  my $global_commands = $self->global_commands_information();
+  return unless ($global_commands);
+
   if ($global_commands->{'float'}) {
     foreach my $current (@{$global_commands->{'float'}}) {
       my $float_type = _parse_float_type($current);