Upgrade Math::BigRat from version 0.25 to 0.26

[perl5.git] / cpan / Math-BigRat / t / bigfltrt.t

diff --git a/cpan/Math-BigRat/t/bigfltrt.t b/cpan/Math-BigRat/t/bigfltrt.t
index ff911b9..278980a 100644 (file)
--- a/cpan/Math-BigRat/t/bigfltrt.t
+++ b/cpan/Math-BigRat/t/bigfltrt.t
@@ -1,33 +1,11 @@
 #!/usr/bin/perl -w
 
-use Test;
 use strict;
+use Test::More tests => 1;
 
-BEGIN
-  {
-  $| = 1;
-  # to locate the testing files
-  my $location = $0; $location =~ s/bigfltrt.t//i;
-  if ($ENV{PERL_CORE})
-    {
-    # testing with the core distribution
-    @INC = qw(../t/lib);
-    }
-  unshift @INC, '../lib';
-  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";
-
-  plan tests => 1;
-  }
+BEGIN {
+  unshift @INC, 't';
+}
 
 use Math::BigRat::Test lib => 'Calc';  # test via this Subclass 
 
@@ -35,7 +13,7 @@ use vars qw ($class $try $x $y $f @args $ans $ans1 $ans1_str $setup $CL);
 $class = "Math::BigRat::Test";
 $CL = "Math::BigInt::Calc";
  
-ok (1,1);
+pass();
 
 # fails still too many tests
-#require 'bigfltpm.inc';               # all tests here for sharing
+#require 't/bigfltpm.inc';             # all tests here for sharing