From test-commits-return-348-archive-asf-public=cust-asf.ponee.io@perl.apache.org Mon Mar 5 15:42:01 2018 Return-Path: X-Original-To: archive-asf-public@cust-asf.ponee.io Delivered-To: archive-asf-public@cust-asf.ponee.io Received: from mail.apache.org (hermes.apache.org [140.211.11.3]) by mx-eu-01.ponee.io (Postfix) with SMTP id 673AE180608 for ; Mon, 5 Mar 2018 15:42:00 +0100 (CET) Received: (qmail 94196 invoked by uid 500); 5 Mar 2018 14:41:59 -0000 Mailing-List: contact test-commits-help@perl.apache.org; run by ezmlm Precedence: bulk List-Help: List-Unsubscribe: List-Post: List-Id: Reply-To: test-dev@perl.apache.org Delivered-To: mailing list test-commits@perl.apache.org Received: (qmail 94186 invoked by uid 99); 5 Mar 2018 14:41:59 -0000 Received: from Unknown (HELO svn01-us-west.apache.org) (209.188.14.144) by apache.org (qpsmtpd/0.29) with ESMTP; Mon, 05 Mar 2018 14:41:59 +0000 Received: from svn01-us-west.apache.org (localhost [127.0.0.1]) by svn01-us-west.apache.org (ASF Mail Server at svn01-us-west.apache.org) with ESMTP id E014E3A00C6 for ; Mon, 5 Mar 2018 14:41:58 +0000 (UTC) Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Subject: svn commit: r1825901 - /perl/Apache-Test/trunk/lib/Apache/TestConfig.pm Date: Mon, 05 Mar 2018 14:41:58 -0000 To: test-commits@perl.apache.org From: jorton@apache.org X-Mailer: svnmailer-1.0.9 Message-Id: <20180305144158.E014E3A00C6@svn01-us-west.apache.org> Author: jorton Date: Mon Mar 5 14:41:58 2018 New Revision: 1825901 URL: http://svn.apache.org/viewvc?rev=1825901&view=rev Log: Add cwd to generated lib path in TEST script since Perl >=5.26 don't do that any more. Modified: perl/Apache-Test/trunk/lib/Apache/TestConfig.pm Modified: perl/Apache-Test/trunk/lib/Apache/TestConfig.pm URL: http://svn.apache.org/viewvc/perl/Apache-Test/trunk/lib/Apache/TestConfig.pm?rev=1825901&r1=1825900&r2=1825901&view=diff ============================================================================== --- perl/Apache-Test/trunk/lib/Apache/TestConfig.pm (original) +++ perl/Apache-Test/trunk/lib/Apache/TestConfig.pm Mon Mar 5 14:41:58 2018 @@ -1027,6 +1027,8 @@ sub perlscript_header { push @dirs, $dir if -d $dir; } + push @dirs, canonpath $FindBin::Bin; + my $dirs = join("\n ", '', @dirs) . "\n";; return <<"EOF";