texinfo-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

branch master updated: file for tests missed in previous commit.


From: Patrice Dumas
Subject: branch master updated: file for tests missed in previous commit.
Date: Sun, 29 Aug 2021 07:32:02 -0400

This is an automated email from the git hooks/post-receive script.

pertusus pushed a commit to branch master
in repository texinfo.

The following commit(s) were added to refs/heads/master by this push:
     new c700473  file for tests missed in previous commit.
c700473 is described below

commit c700473b746a689492967ca85c60ddb2a0a25aec
Author: Patrice Dumas <pertusus@free.fr>
AuthorDate: Sun Aug 29 13:31:08 2021 +0200

    file for tests missed in previous commit.
    
    * tp/Texinfo/Structuring.pm (warn_non_empty_parts)
    (set_menus_node_directions, complete_node_tree_with_menus)
    (nodes_tree, elements_directions, setup_index_entry_keys_formatting)
    (do_index_keys, sort_indices, sort_indices_by_letter),
    tp/texi2any.pl, tp/Texinfo/Convert/HTML.pm, tp/Texinfo/Convert/IXIN.pm,
    tp/Texinfo/Convert/LaTeX.pm, tp/Texinfo/Convert/Plaintext.pm,
    tp/init/chm.pm: pass explicitly parser informations and configuration
    informations.
---
 tp/t/test_utils.pl | 22 +++++++++++++---------
 1 file changed, 13 insertions(+), 9 deletions(-)

diff --git a/tp/t/test_utils.pl b/tp/t/test_utils.pl
index a337d5f..46bcc0d 100644
--- a/tp/t/test_utils.pl
+++ b/tp/t/test_utils.pl
@@ -858,23 +858,28 @@ sub test($$)
   } else {
     $result = $parser->parse_texi_file($test_file);
   }
+  my $parser_informations = $parser->global_informations();
   my ($labels, $targets_list, $nodes_list) = $parser->labels_information();
   my $refs = $parser->internal_references_information();
-  Texinfo::Structuring::associate_internal_references($parser, $labels, $refs);
+  Texinfo::Structuring::associate_internal_references($parser, 
$parser_informations,
+                                                      $labels, $refs);
   my $floats = $parser->floats_information();
 
+  my $global_commands = $parser->global_commands_information();
   my $structure = Texinfo::Structuring::sectioning_structure($parser, $result);
   if ($structure) {
-    Texinfo::Structuring::warn_non_empty_parts($parser);
+    Texinfo::Structuring::warn_non_empty_parts($parser, $global_commands);
   }
 
   Texinfo::Structuring::number_floats($floats);
 
-  Texinfo::Structuring::set_menus_node_directions($parser, $nodes_list, 
$labels);
-  my $top_node = Texinfo::Structuring::nodes_tree($parser, $nodes_list, 
$labels);
+  Texinfo::Structuring::set_menus_node_directions($parser, $parser,
+                  $parser_informations, $global_commands, $nodes_list, 
$labels);
+  my $top_node = Texinfo::Structuring::nodes_tree($parser, 
$parser_informations,
+                                                            $nodes_list, 
$labels);
 
   if (defined($nodes_list)) {
-    Texinfo::Structuring::complete_node_tree_with_menus($parser,
+    Texinfo::Structuring::complete_node_tree_with_menus($parser, $parser,
                                                         $nodes_list, 
$top_node);
     Texinfo::Structuring::check_nodes_are_referenced($parser,
                                                      $nodes_list, $top_node,
@@ -897,9 +902,8 @@ sub test($$)
   my $sorted_index_entries;
   if ($merged_index_entries) {
     $sorted_index_entries 
-      = Texinfo::Structuring::sort_indices_by_letter($parser, 
-                                                     $merged_index_entries,
-                                                     $index_names);
+      = Texinfo::Structuring::sort_indices_by_letter($parser, $parser,
+             $parser_informations, $merged_index_entries, $index_names);
   }
   if ($simple_menus) {
     # require instead of use for speed when this module is not needed
@@ -1013,7 +1017,7 @@ sub test($$)
     $elements = Texinfo::Structuring::split_by_section($result);
   }
   if ($split) {
-    Texinfo::Structuring::elements_directions($parser, $elements);
+    Texinfo::Structuring::elements_directions($parser, $parser, $elements);
     $directions_text = '';
     foreach my $element (@$elements) {
       $directions_text .= Texinfo::Structuring::_print_directions($element);



reply via email to

[Prev in Thread] Current Thread [Next in Thread]