branch master updated: * tp/Texinfo/XSLoader.pm (init): show the DynaLoader error message if dl_load_file failed.

[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 1c0dc4e20c * tp/Texinfo/XSLoader.pm (init): show the DynaLoader error 
message if dl_load_file failed.
1c0dc4e20c is described below

commit 1c0dc4e20cea81645e84465d9ed2c45be5a988a3
Author: Patrice Dumas <pertusus@free.fr>
AuthorDate: Wed Dec 28 00:31:32 2022 +0100

    * tp/Texinfo/XSLoader.pm (init): show the DynaLoader error message
    if dl_load_file failed.
---
 ChangeLog              | 5 +++++
 tp/Texinfo/XSLoader.pm | 3 ++-
 2 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index c329bfab8e..48ca32f393 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2022-12-27  Patrice Dumas  <pertusus@free.fr>
+
+       * tp/Texinfo/XSLoader.pm (init): show the DynaLoader error message
+       if dl_load_file failed.
+
 2022-12-27  Patrice Dumas  <pertusus@free.fr>
 
        * tp/Texinfo/XS/parsetexi/end_line.c: defined floats lists related
diff --git a/tp/Texinfo/XSLoader.pm b/tp/Texinfo/XSLoader.pm
index 448dfa96cd..cf71928323 100644
--- a/tp/Texinfo/XSLoader.pm
+++ b/tp/Texinfo/XSLoader.pm
@@ -170,7 +170,8 @@ sub init {
   my $flags = 0;
   my $libref = DynaLoader::dl_load_file($dlpath, $flags);
   if (!$libref) {
-    _fatal "$module_name: couldn't load file $dlpath";
+    my $message = DynaLoader::dl_error();
+    _fatal "$module_name: couldn't load file $dlpath: $message";
     goto FALLBACK;
   }
   _debug "$dlpath loaded";