One missing bit of Math::BigInt 1.58.

p4raw-id: //depot/perl@17151

diff --git a/t/lib/Math/BigInt/BareCalc.pm b/t/lib/Math/BigInt/BareCalc.pm
index 7c56c4eb70011740f96eb3cb9a24d25060687bd6..797957f7481039713b31968a67c55d7424e3f2f3 100644 (file)
--- a/t/lib/Math/BigInt/BareCalc.pm
+++ b/t/lib/Math/BigInt/BareCalc.pm
@@ -14,10 +14,11 @@ $VERSION = '0.02';
 
 # uses Calc, but only features the strictly necc. methods.
 
-use Math::BigInt::Calc '0.18';
+use Math::BigInt::Calc '0.29';
 
 BEGIN
   {
+  no strict 'refs';
   foreach (qw/ base_len new zero one two copy str num add sub mul div inc dec
                acmp len digit zeros
                is_zero is_one is_odd is_even is_one check
@@ -25,7 +26,6 @@ BEGIN
                /)
     {
     my $name  = "Math::BigInt::Calc::_$_";
-    no strict 'refs';
     *{"Math::BigInt::BareCalc::_$_"} = \&$name;
     }
   }