branch master updated: * tp/Texinfo/XSLoader.pm (init): call Texinfo::Parser->import() after loading the NonXS parser.

[Patrice Dumas]

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 abd8ba6e67 * tp/Texinfo/XSLoader.pm (init): call 
Texinfo::Parser->import() after loading the NonXS parser.
abd8ba6e67 is described below

commit abd8ba6e679304c6c14f262bf6c6a3d6a30574c7
Author: Patrice Dumas <pertusus@free.fr>
AuthorDate: Thu Mar 2 22:04:32 2023 +0100

    * tp/Texinfo/XSLoader.pm (init): call Texinfo::Parser->import() after
    loading the NonXS parser.
---
 ChangeLog              | 5 +++++
 tp/Texinfo/XSLoader.pm | 4 ++--
 2 files changed, 7 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 17dca23855..c13d6464f0 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2023-03-02  Patrice Dumas  <pertusus@free.fr>
+
+       * tp/Texinfo/XSLoader.pm (init): call Texinfo::Parser->import() after
+       loading the NonXS parser.
+
 2023-03-02  Patrice Dumas  <pertusus@free.fr>
 
        * tp/Texinfo/XS/parsetexi/menus.c (handle_menu): start a node entry
diff --git a/tp/Texinfo/XSLoader.pm b/tp/Texinfo/XSLoader.pm
index cf71928323..be6507878c 100644
--- a/tp/Texinfo/XSLoader.pm
+++ b/tp/Texinfo/XSLoader.pm
@@ -224,7 +224,7 @@ sub init {
   
   return $module;
   
-FALLBACK:
+ FALLBACK:
   if ($TEXINFO_XS eq 'required') {
     die "unset the TEXINFO_XS environment variable to use the "
        ."pure Perl modules\n";
@@ -239,7 +239,7 @@ FALLBACK:
 
   # Fall back to using the Perl code.
   # Use eval here to interpret :: properly in module name.
-  eval "require $fallback_module";
+  eval "require $fallback_module; Texinfo::Parser->import();";
   if ($@) {
     warn();
     die "Error loading $fallback_module\n";