[no subject]

[Patrice Dumas]

branch: master
commit bdbadf23966a9ecb8fc65afe909c374b64a8f45a
Author: Patrice Dumas <pertusus@free.fr>
AuthorDate: Mon Apr 8 23:13:12 2024 +0200

    * tp/t/test_utils.pl (test), tp/texi2any.pl: use $document as
    customization provider.
---
 ChangeLog          |  5 +++++
 tp/t/test_utils.pl |  2 +-
 tp/texi2any.pl     | 14 ++++++++------
 3 files changed, 14 insertions(+), 7 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index d0f75cdd4b..9b8a7b826a 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2024-04-08  Patrice Dumas  <pertusus@free.fr>
+
+       * tp/t/test_utils.pl (test), tp/texi2any.pl: use $document as
+       customization provider.
+
 2024-04-08  Patrice Dumas  <pertusus@free.fr>
 
        * tp/Texinfo/Transformations.pm (complete_tree_nodes_missing_menu)
diff --git a/tp/t/test_utils.pl b/tp/t/test_utils.pl
index 946dcd4329..df8d21860c 100644
--- a/tp/t/test_utils.pl
+++ b/tp/t/test_utils.pl
@@ -1140,7 +1140,7 @@ sub test($$)
       my $tree_transformation_sub = $tested_transformations{$transformation};
       if ($transformation eq 'protect_hashchar_at_line_beginning') {
         &$tree_transformation_sub($tree, $document->registrar(),
-                                  $main_configuration);
+                                  $document);
       } else {
         &$tree_transformation_sub($tree);
       }
diff --git a/tp/texi2any.pl b/tp/texi2any.pl
index 083291a9c8..731a72abf2 100755
--- a/tp/texi2any.pl
+++ b/tp/texi2any.pl
@@ -1527,7 +1527,9 @@ while(@input_files) {
 
   # setup a configuration Perl object which defines get_conf, use
   # the main program customization information for which per-document
-  # customization can be set.  It is used by
+  # customization can be set.  This allows to call functions calling
+  # get_conf and set_conf.  After this is done, the customization
+  # information is registered in the document and used by
   # Structuring/Transformations methods needing access to configuration
   # information.
   # OUTPUT_ENCODING_NAME is set and accessed in set_output_encodings.
@@ -1675,8 +1677,7 @@ while(@input_files) {
 
   # do it now to get error messages here
   if ($formats_table{$converted_format}->{'setup_index_entries_sort_strings'}) 
{
-    Texinfo::Document::setup_indices_sort_strings($document,
-                                                  $main_configuration);
+    Texinfo::Document::setup_indices_sort_strings($document, $document);
   }
 
   #Texinfo::Document::rebuild_document($document);
@@ -1715,9 +1716,10 @@ while(@input_files) {
                             %$file_cmdline_options,
                           };
 
-  # NOTE nothing set in $main_configuration is passed directly, which is
-  # clean, the Converters already have that information in $converter_options,
-  # can determine it themselves or use their defaults.
+  # NOTE nothing set through $main_configuration in customization registered in
+  # document is passed directly, which is clean, the Converters already
+  # have that information in $converter_options, can determine it themselves
+  # or use their defaults.
   # It could be possible to pass some information if it allows
   # for instance to have some consistent information for Structuring
   # and Converters.