[prev in list] [next in list] [prev in thread] [next in thread] 

List:       apache-modperl-test-cvs
Subject:    svn commit: r1865414 - /perl/Apache-Test/trunk/lib/Apache/TestRun.pm
From:       stevehay () apache ! org
Date:       2019-08-19 7:47:51
Message-ID: 20190819074751.CE3CE3A071B () svn01-us-west ! apache ! org
[Download RAW message or body]

Author: stevehay
Date: Mon Aug 19 07:47:51 2019
New Revision: 1865414

URL: http://svn.apache.org/viewvc?rev=1865414&view=rev
Log:
Fix for recent perls in which '.' is no longer in @INC by default

Running mod_perl's ModPerl-Registry tests from its ModPerl-Registry folder doesn't \
get off the ground without this.

Modified:
    perl/Apache-Test/trunk/lib/Apache/TestRun.pm

Modified: perl/Apache-Test/trunk/lib/Apache/TestRun.pm
URL: http://svn.apache.org/viewvc/perl/Apache-Test/trunk/lib/Apache/TestRun.pm?rev=1865414&r1=1865413&r2=1865414&view=diff
 ==============================================================================
--- perl/Apache-Test/trunk/lib/Apache/TestRun.pm (original)
+++ perl/Apache-Test/trunk/lib/Apache/TestRun.pm Mon Aug 19 07:47:51 2019
@@ -776,7 +776,7 @@ sub detect_relocation {
     return unless -e $config_file;
 
     my %inc = %INC;
-    eval { require "$config_file" };
+    eval { require "./$config_file" };
     %INC = %inc; # be stealth
     warn($@), return if $@;
 


[prev in list] [next in list] [prev in thread] [next in thread]