Prereq Math::BigInt 1.993 to fix broken tests

[chaz/p5-File-KDBX] / lib / File / KDBX / Util.pm

diff --git a/lib/File/KDBX/Util.pm b/lib/File/KDBX/Util.pm
index b8c901b048d6c73f1187a8d7d5454f409dbc479e..d27263247863fb919a7f84352522f7f4a7c3c1c3 100644 (file)
--- a/lib/File/KDBX/Util.pm
+++ b/lib/File/KDBX/Util.pm
@@ -600,6 +600,7 @@ sub pack_Ql {
     require Config;
     if ($Config::Config{ivsize} < 8) {
         if (blessed $num && $num->can('as_hex')) {
+            require Math::BigInt;
             return "\xff\xff\xff\xff\xff\xff\xff\xff" if Math::BigInt->new('18446744073709551615') <= $num;
             return "\x00\x00\x00\x00\x00\x00\x00\x80" if $num <= Math::BigInt->new('-9223372036854775808');
             my $neg;