Upgrade to Math::BigInt v1.65, Math::BigRat v0.10,

[perl5.git] / lib / bignum / t / brinfnan.t

diff --git a/lib/bignum/t/brinfnan.t b/lib/bignum/t/brinfnan.t
index 942ffcc..286adbc 100644 (file)
--- a/lib/bignum/t/brinfnan.t
+++ b/lib/bignum/t/brinfnan.t
@@ -8,26 +8,9 @@ use strict;
 BEGIN
   {
   $| = 1;
-  my $location = $0; $location =~ s/brinfnan.t//;
-  if ($ENV{PERL_CORE})
-    {
-    @INC = qw(../lib);          # testing with the core distribution
-    }
-  else
-    {
-    unshift @INC, '../lib';     # for testing manually
-    }
-  if (-d 't')
-    {
-    chdir 't';
-    require File::Spec;
-    unshift @INC, File::Spec->catdir(File::Spec->updir, $location);
-    }
-  else
-    {
-    unshift @INC, $location;
-    }
-  print "# INC = @INC\n";
+  chdir 't' if -d 't';
+  unshift @INC, '../lib';
+  unshift @INC, '../lib/bignum/t' if $ENV{PERL_CORE};
   plan tests => 26;
   }