From f516df3fbf4af73d77cb4ec844e952a857ffa449 Mon Sep 17 00:00:00 2001 From: Hannibal <3263978+annibale-x@users.noreply.github.com> Date: Wed, 15 Nov 2023 21:30:22 +0100 Subject: [PATCH] Update LMDB_File.pm $tflags defaulted to 0 in LMDB_File constructor to avoid "uninitialized value in bitwise ..." warning --- lib/LMDB_File.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/lib/LMDB_File.pm b/lib/LMDB_File.pm index c3183fb..177df8f 100644 --- a/lib/LMDB_File.pm +++ b/lib/LMDB_File.pm @@ -151,6 +151,7 @@ sub new { if !ref($parent) && @$txl; _begin($env, ref($parent) && $parent, $tflags, my $self); return unless $self; + $tflags = 0 unless defined $tflags ; $Txns{$$self} = { Active => 1, Env => $env, # A transaction references the environment