From 0136f52d77e8be21b748613dba2fd0ebd8cde744 Mon Sep 17 00:00:00 2001 From: Erik Huelsmann Date: Sun, 1 Oct 2023 19:24:20 +0200 Subject: [PATCH] Fix Math::BigFloat@1.999831+ upgrade improvements breakage Before, apparently, we depended on Math::BigFloat /not/ downgrading on many operations. That behaviour (bug) has been fixed in 1.999831, which is included in Perl 5.36. This commit explicitly forbids Math::BigFloat from downgrading. --- lib/LedgerSMB/PGNumber.pm | 3 +++ 1 file changed, 3 insertions(+) diff --git a/lib/LedgerSMB/PGNumber.pm b/lib/LedgerSMB/PGNumber.pm index 1c94023fc0..4c37a98462 100644 --- a/lib/LedgerSMB/PGNumber.pm +++ b/lib/LedgerSMB/PGNumber.pm @@ -41,6 +41,9 @@ $accuracy = $precision = undef; $round_mode = 'even'; $div_scale = 40; +# Prevent downgrading to Math::BigInt +$Math::BigFloat::downgrade = undef; + =head1 INHERITS =over