diff options
| -rwxr-xr-x | Porting/Maintainers.pl | 2 | ||||
| -rw-r--r-- | dist/Math-BigInt/lib/Math/BigInt.pm | 4 | ||||
| -rw-r--r-- | pod/perldelta.pod | 4 |
3 files changed, 5 insertions, 5 deletions
diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl index fc5bb34ad4..452655a9d6 100755 --- a/Porting/Maintainers.pl +++ b/Porting/Maintainers.pl @@ -849,7 +849,7 @@ use File::Glob qw(:case); 'Math::BigInt' => { 'MAINTAINER' => 'tels', - 'DISTRIBUTION' => 'FLORA/Math-BigInt-1.93.tar.gz', + 'DISTRIBUTION' => 'FLORA/Math-BigInt-1.95.tar.gz', 'FILES' => q[dist/Math-BigInt], 'EXCLUDED' => [ qr{^inc/}, qr{^examples/}, diff --git a/dist/Math-BigInt/lib/Math/BigInt.pm b/dist/Math-BigInt/lib/Math/BigInt.pm index 08c163286f..b673bf1517 100644 --- a/dist/Math-BigInt/lib/Math/BigInt.pm +++ b/dist/Math-BigInt/lib/Math/BigInt.pm @@ -18,7 +18,7 @@ package Math::BigInt; my $class = "Math::BigInt"; use 5.006002; -$VERSION = '1.93'; +$VERSION = '1.95'; @ISA = qw(Exporter); @EXPORT_OK = qw(objectify bgcd blcm); @@ -1260,7 +1260,7 @@ sub blog # objectify is costly, so avoid it if ((!ref($_[0])) || (ref($_[0]) ne ref($_[1]))) { - ($self,$x,$base,@r) = objectify(1,ref($x),@_); + ($self,$x,$base,@r) = objectify(2,@_); } return $x if $x->modify('blog'); diff --git a/pod/perldelta.pod b/pod/perldelta.pod index ad1f9309d6..695c3e0a34 100644 --- a/pod/perldelta.pod +++ b/pod/perldelta.pod @@ -219,8 +219,8 @@ C<Filter::Simple> has been upgraded from version 0.84 to 0.85. =item * -C<Math::BigInt> has been upgraded from version 1.89_01 to 1.93. -C<Math::BigInt::Calc> has been upgraded from version 0.52 to 0.53. +C<Math::BigInt> has been upgraded from version 1.89_01 to 1.95. +C<Math::BigInt::Calc> has been upgraded from version 0.52 to 0.54. This fixes, among other things, incorrect results when computing binomial coefficients (RT#77640). |