This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
fix dist/Time-HiRes/t/*.t that assumed '.' in @INC
authorDavid Mitchell <davem@iabyn.com>
Fri, 7 Apr 2017 10:24:33 +0000 (11:24 +0100)
committerDavid Mitchell <davem@iabyn.com>
Fri, 7 Apr 2017 13:42:23 +0000 (14:42 +0100)
dist/Time-HiRes/t/alarm.t
dist/Time-HiRes/t/clock.t
dist/Time-HiRes/t/gettimeofday.t
dist/Time-HiRes/t/itimer.t
dist/Time-HiRes/t/nanosleep.t
dist/Time-HiRes/t/sleep.t
dist/Time-HiRes/t/stat.t
dist/Time-HiRes/t/time.t
dist/Time-HiRes/t/ualarm.t
dist/Time-HiRes/t/usleep.t
dist/Time-HiRes/t/utime.t

index 4935410..7bdc6da 100644 (file)
@@ -1,6 +1,7 @@
 use strict;
 
 use Test::More tests => 10;
+BEGIN { push @INC, '.' }
 use t::Watchdog;
 
 BEGIN { require_ok "Time::HiRes"; }
index 346ca57..7686500 100644 (file)
@@ -1,6 +1,7 @@
 use strict;
 
 use Test::More tests => 5;
+BEGIN { push @INC, '.' }
 use t::Watchdog;
 
 BEGIN { require_ok "Time::HiRes"; }
index 69defe8..9f2fd7e 100644 (file)
@@ -9,6 +9,7 @@ BEGIN {
 }
 
 use Test::More tests => 6;
+BEGIN { push @INC, '.' }
 use t::Watchdog;
 
 my @one = Time::HiRes::gettimeofday();
index 31cdd67..e196b16 100644 (file)
@@ -26,6 +26,7 @@ BEGIN {
 }
 
 use Test::More tests => 2;
+BEGIN { push @INC, '.' }
 use t::Watchdog;
 
 my $limit = 0.25; # 25% is acceptable slosh for testing timers
index c17a7e4..5ea8ff7 100644 (file)
@@ -9,6 +9,7 @@ BEGIN {
 }
 
 use Test::More tests => 3;
+BEGIN { push @INC, '.' }
 use t::Watchdog;
 
 eval { Time::HiRes::nanosleep(-5) };
index b84b4c6..0ab6340 100644 (file)
@@ -1,6 +1,7 @@
 use strict;
 
 use Test::More tests => 4;
+BEGIN { push @INC, '.' }
 use t::Watchdog;
 
 BEGIN { require_ok "Time::HiRes"; }
index a59a342..d5e22ac 100644 (file)
@@ -14,6 +14,7 @@ BEGIN {
 }
 
 use Test::More tests => 43;
+BEGIN { push @INC, '.' }
 use t::Watchdog;
 
 my @atime;
index 6f219f9..5db016f 100644 (file)
@@ -1,6 +1,7 @@
 use strict;
 
 use Test::More tests => 2;
+BEGIN { push @INC, '.' }
 use t::Watchdog;
 
 BEGIN { require_ok "Time::HiRes"; }
index b50a175..0f9a829 100644 (file)
@@ -9,6 +9,7 @@ BEGIN {
 }
 
 use Test::More tests => 12;
+BEGIN { push @INC, '.' }
 use t::Watchdog;
 
 use Config;
index bdf372b..9322458 100644 (file)
@@ -9,6 +9,7 @@ BEGIN {
 }
 
 use Test::More tests => 6;
+BEGIN { push @INC, '.' }
 use t::Watchdog;
 
 eval { Time::HiRes::usleep(-2) };
index f84bccf..22fd48e 100644 (file)
@@ -48,6 +48,7 @@ BEGIN {
 }
 
 use Test::More tests => 18;
+BEGIN { push @INC, '.' }
 use t::Watchdog;
 use File::Temp qw( tempfile );