[no subject]

[Patrice Dumas]

branch: master
commit 49567bfdce140a58dcbfd1ffc1caeeca676d1fe2
Author: Patrice Dumas <pertusus@free.fr>
AuthorDate: Sun Mar 3 22:39:09 2024 +0100

    * Pod-Simple-Texinfo/pod2texi.pl (_parsed_manual_tree): update calls
    to Texinfo::Transformations and Texinfo::Structuring methods by
    removing registrar and using document when needed.
---
 ChangeLog                      | 6 ++++++
 Pod-Simple-Texinfo/pod2texi.pl | 9 ++++-----
 2 files changed, 10 insertions(+), 5 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index d792ac3182..866dcf16ab 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -2,6 +2,12 @@
 
        * tp/Texinfo/XS/main/get_perl_info.c: Remove unnecessary #include.
 
+2024-03-03  Patrice Dumas  <pertusus@free.fr>
+
+       * Pod-Simple-Texinfo/pod2texi.pl (_parsed_manual_tree): update calls
+       to Texinfo::Transformations and Texinfo::Structuring methods by
+       removing registrar and using document when needed.
+
 2024-03-03  Patrice Dumas  <pertusus@free.fr>
 
        * tp/t/test_protect_hashchar_at_line_beginning.t (run_test): store
diff --git a/Pod-Simple-Texinfo/pod2texi.pl b/Pod-Simple-Texinfo/pod2texi.pl
index 0253a958c9..62f992a5c4 100755
--- a/Pod-Simple-Texinfo/pod2texi.pl
+++ b/Pod-Simple-Texinfo/pod2texi.pl
@@ -287,7 +287,6 @@ sub _parsed_manual_tree($$$$$)
   my $texi_parser = Texinfo::Parser::parser();
   my $document = $texi_parser->parse_texi_text($manual_texi);
   my $tree = $document->tree();
-  my $registrar = $texi_parser->registered_errors();
   
   my $identifier_target = $document->labels_information();
 
@@ -300,18 +299,18 @@ sub _parsed_manual_tree($$$$$)
         = Texinfo::Parser::parse_texi_line(undef, $manual_texi);
     }
     Texinfo::Transformations::fill_gaps_in_sectioning($tree,
-                                                      
$commands_heading_content);
+                                              $commands_heading_content);
     if ($section_nodes) {
       Texinfo::Transformations::insert_nodes_for_sectioning_commands(
-                                           $document, $registrar, 
$texi_parser);
+                                           $document, $texi_parser);
       Texinfo::Document::rebuild_document($document);
     }
   }
-  Texinfo::Structuring::sectioning_structure($tree, $registrar, $texi_parser);
+  Texinfo::Structuring::sectioning_structure($document, $texi_parser);
   my $refs = $document->internal_references_information();
   # this is needed to set 'normalized' for menu entries, they are
   # used in complete_tree_nodes_menus.
-  Texinfo::Structuring::associate_internal_references($document, $registrar,
+  Texinfo::Structuring::associate_internal_references($document,
                                                       $texi_parser);
   Texinfo::Transformations::complete_tree_nodes_menus($tree)
     if ($section_nodes and $do_node_menus);