This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Update Time-HiRes to CPAN version 1.9742
authorChris 'BinGOs' Williams <chris@bingosnet.co.uk>
Sat, 24 Jun 2017 13:48:59 +0000 (14:48 +0100)
committerChris 'BinGOs' Williams <chris@bingosnet.co.uk>
Sat, 24 Jun 2017 13:48:59 +0000 (14:48 +0100)
  [DELTA]

1.9742 [2017-04-16]
  - prefer 3-argument open: blead 1ae6ead9
  - fix dist/Time-HiRes/t/*.t that assumed '.' in @INC: blead 465db51d
  - fix cases where 'do file' should be 'do ./file'.: blead 8b69401c

Porting/Maintainers.pl
dist/Time-HiRes/Changes
dist/Time-HiRes/HiRes.pm
dist/Time-HiRes/Makefile.PL

index 847f625..9ae08c9 100755 (executable)
@@ -1178,7 +1178,7 @@ use File::Glob qw(:case);
     },
 
     'Time::HiRes' => {
-        'DISTRIBUTION' => 'JHI/Time-HiRes-1.9741.tar.gz',
+        'DISTRIBUTION' => 'JHI/Time-HiRes-1.9742.tar.gz',
         'FILES'        => q[dist/Time-HiRes],
     },
 
index c2ad5a5..0084af6 100644 (file)
@@ -1,5 +1,10 @@
 Revision history for the Perl extension Time::HiRes.
 
+1.9742 [2017-04-16]
+  - prefer 3-argument open: blead 1ae6ead9
+  - fix dist/Time-HiRes/t/*.t that assumed '.' in @INC: blead 465db51d
+  - fix cases where 'do file' should be 'do ./file'.: blead 8b69401c
+
 1.9741 [2016-11-20]
   - C++11 compatibility: blead a914236c
   - El Capitan compatibility: blead 45bbc013
index a3ddd59..386d30d 100644 (file)
@@ -28,7 +28,7 @@ our @EXPORT_OK = qw (usleep sleep ualarm alarm gettimeofday time tv_interval
                 stat lstat utime
                );
 
-our $VERSION = '1.9741';
+our $VERSION = '1.9742';
 our $XS_VERSION = $VERSION;
 $VERSION = eval $VERSION;
 
index 66691fd..ca4d4dc 100644 (file)
@@ -417,11 +417,11 @@ sub DEFINE {
 }
 
 sub init {
-    my $hints = File::Spec->catfile("hints", "$^O.pl");
+    my $hints = File::Spec->catfile(".", "hints", "$^O.pl");
     if (-f $hints) {
        print "Using hints $hints...\n";
        local $self;
-       do "./$hints";
+       do $hints;
        if (exists $self->{LIBS}) {
            $LIBS = $self->{LIBS};
            print "Extra libraries: @$LIBS...\n";