In perl.git, the branch blead has been updated <https://perl5.git.perl.org/perl.git/commitdiff/78709841456d5de589c11618ef21cd23f590290a?hp=1990fc31cda5d997715f410156c0103503187a35>
- Log ----------------------------------------------------------------- commit 78709841456d5de589c11618ef21cd23f590290a Author: Lukas Mai <l....@web.de> Date: Sun Oct 22 13:43:38 2017 +0200 ODBM_File: avoid "flags set but not used" warning ----------------------------------------------------------------------- Summary of changes: ext/ODBM_File/ODBM_File.pm | 2 +- ext/ODBM_File/ODBM_File.xs | 1 + 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/ext/ODBM_File/ODBM_File.pm b/ext/ODBM_File/ODBM_File.pm index 31840257a3..99799bc520 100644 --- a/ext/ODBM_File/ODBM_File.pm +++ b/ext/ODBM_File/ODBM_File.pm @@ -7,7 +7,7 @@ require Tie::Hash; require XSLoader; our @ISA = qw(Tie::Hash); -our $VERSION = "1.14"; +our $VERSION = "1.15"; XSLoader::load(); diff --git a/ext/ODBM_File/ODBM_File.xs b/ext/ODBM_File/ODBM_File.xs index eaa1923c36..9b708119ae 100644 --- a/ext/ODBM_File/ODBM_File.xs +++ b/ext/ODBM_File/ODBM_File.xs @@ -175,6 +175,7 @@ odbm_STORE(db, key, value, flags = DBM_REPLACE) croak("odbm store returned %d, errno %d, key \"%s\"", RETVAL,errno,key.dptr); } + PERL_UNUSED_VAR(flags); int odbm_DELETE(db, key) -- Perl5 Master Repository