[8078] XSLoader.pm skip @INC hooks

[gavinsmith0123]

Revision: 8078
          http://svn.sv.gnu.org/viewvc/?view=rev&root=texinfo&revision=8078
Author:   gavin
Date:     2018-08-15 12:12:54 -0400 (Wed, 15 Aug 2018)
Log Message:
-----------
XSLoader.pm skip @INC hooks

Modified Paths:
--------------
    trunk/ChangeLog
    trunk/tp/Texinfo/XSLoader.pm

Modified: trunk/ChangeLog
===================================================================
--- trunk/ChangeLog     2018-08-15 16:00:47 UTC (rev 8077)
+++ trunk/ChangeLog     2018-08-15 16:12:54 UTC (rev 8078)
@@ -1,5 +1,9 @@
 2018-08-15  Gavin Smith  <address@hidden>
 
+       * tp/Texinfo/XSLoader.pm (_find_file): Skip @INC hooks.
+
+2018-08-15  Gavin Smith  <address@hidden>
+
        * tp/Texinfo/XS/configure.ac (AC_CONFIG_FILES):
        Add parsetexi/Makefile.
        * tp/Texinfo/XS/Makefile.am (SUBDIRS): Add parsetexi.

Modified: trunk/tp/Texinfo/XSLoader.pm
===================================================================
--- trunk/tp/Texinfo/XSLoader.pm        2018-08-15 16:00:47 UTC (rev 8077)
+++ trunk/tp/Texinfo/XSLoader.pm        2018-08-15 16:12:54 UTC (rev 8078)
@@ -50,6 +50,7 @@
 sub _find_file($) {
   my $file = shift;
   for my $dir (@INC) {
+    next if ref($dir);
     _debug "checking $dir/$file";
     if (-f "$dir/$file") {
       _debug "found $dir/$file";