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

Reply via email to