In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/07d51b5358c64b41da1bc50212be10cc23242c2a?hp=d190dde9b72a7c306622389007b0dba86901ce52>

- Log -----------------------------------------------------------------
commit 07d51b5358c64b41da1bc50212be10cc23242c2a
Author: James E Keenan <jkee...@cpan.org>
Date:   Fri Sep 15 19:46:03 2017 -0400

    Revert changes to t/op/threads-dirh.t in 1ce8be81dfaf09bc8a07.
    
    They were causing failures on smoke testers running threaded builds on 
Linux.
    
    For: RT #132092
-----------------------------------------------------------------------

Summary of changes:
 t/op/threads-dirh.t | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/t/op/threads-dirh.t b/t/op/threads-dirh.t
index 82d90768ab..e1d5c996ad 100644
--- a/t/op/threads-dirh.t
+++ b/t/op/threads-dirh.t
@@ -4,21 +4,21 @@
 
 BEGIN {
      chdir 't' if -d 't';
+     @INC = '../lib';
      require './test.pl';
-     set_up_inc('../lib');
      $| = 1;
-     require Config;
-}
 
-skip_all_without_config('useithreads');
-skip_all_if_miniperl("no dynamic loading on miniperl, no threads");
+     require Config;
+     skip_all_without_config('useithreads');
+     skip_all_if_miniperl("no dynamic loading on miniperl, no threads");
 
-plan(6);
+     plan(6);
+}
 
 use strict;
 use warnings;
-eval q/use threads/;
-eval q/use threads::shared/;
+use threads;
+use threads::shared;
 use File::Path;
 use File::Spec::Functions qw 'updir catdir';
 use Cwd 'getcwd';

--
Perl5 Master Repository

Reply via email to