diff options
author | Paul Marquess <pmqs@cpan.org> | 2021-07-17 02:24:14 +0000 |
---|---|---|
committer | James E Keenan <jkeenan@cpan.org> | 2021-07-17 02:24:14 +0000 |
commit | 320f4ba29003e664eedac8106735d0958c8328dd (patch) | |
tree | c4f90d7ea2d5ee7aedcf99169dfd059684839a3f /cpan/DB_File | |
parent | 415da10787d8fa5176e711559172aa0604ec3d0d (diff) | |
download | perl-320f4ba29003e664eedac8106735d0958c8328dd.tar.gz |
Sync DB_File with CPAN version 1.856
From Changes:
1.856 22 June 2021
* Ensure that all *.bak files are cleaned up
https://github.com/pmqs/DB_File/pull/9
96bcf494625897ab4fcda322481dd6f730bdb668
Diffstat (limited to 'cpan/DB_File')
-rw-r--r-- | cpan/DB_File/DB_File.pm | 6 | ||||
-rw-r--r-- | cpan/DB_File/DB_File.xs | 2 | ||||
-rw-r--r-- | cpan/DB_File/Makefile.PL | 2 | ||||
-rw-r--r-- | cpan/DB_File/dbinfo | 2 | ||||
-rw-r--r-- | cpan/DB_File/typemap | 8 |
5 files changed, 10 insertions, 10 deletions
diff --git a/cpan/DB_File/DB_File.pm b/cpan/DB_File/DB_File.pm index 20a45e8d74..a7543d5821 100644 --- a/cpan/DB_File/DB_File.pm +++ b/cpan/DB_File/DB_File.pm @@ -2,7 +2,7 @@ # # Written by Paul Marquess (pmqs@cpan.org) # -# Copyright (c) 1995-2020 Paul Marquess. All rights reserved. +# Copyright (c) 1995-2021 Paul Marquess. All rights reserved. # This program is free software; you can redistribute it and/or # modify it under the same terms as Perl itself. @@ -165,7 +165,7 @@ use Carp; # Module not thread safe, so don't clone sub CLONE_SKIP { 1 } -$VERSION = "1.855" ; +$VERSION = "1.856" ; $VERSION = eval $VERSION; # needed for dev releases { @@ -2325,7 +2325,7 @@ archive in F<src/misc/db.1.85.tar.gz>. =head1 COPYRIGHT -Copyright (c) 1995-2020 Paul Marquess. All rights reserved. This program +Copyright (c) 1995-2021 Paul Marquess. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. diff --git a/cpan/DB_File/DB_File.xs b/cpan/DB_File/DB_File.xs index 7b473958ee..d0ed44379f 100644 --- a/cpan/DB_File/DB_File.xs +++ b/cpan/DB_File/DB_File.xs @@ -6,7 +6,7 @@ All comments/suggestions/problems are welcome - Copyright (c) 1995-2020 Paul Marquess. All rights reserved. + Copyright (c) 1995-2021 Paul Marquess. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. diff --git a/cpan/DB_File/Makefile.PL b/cpan/DB_File/Makefile.PL index b149268295..a09491e10e 100644 --- a/cpan/DB_File/Makefile.PL +++ b/cpan/DB_File/Makefile.PL @@ -72,7 +72,7 @@ WriteMakefile( #OPTIMIZE => '-g', 'depend' => { 'Makefile' => 'config.in', 'version$(OBJ_EXT)' => 'version.c'}, - 'clean' => { FILES => 'constants.h constants.xs DB_File.pm.bak t/db-btree.t.bak t/db-hash.t.bak t/db-recno.t.bak t/pod.t.bak' }, + 'clean' => { FILES => 'constants.h constants.xs *.bak t/*.t.bak' }, 'macro' => { my_files => "@files" }, 'dist' => { COMPRESS => 'gzip', SUFFIX => 'gz', DIST_DEFAULT => 'MyDoubleCheck tardist'}, diff --git a/cpan/DB_File/dbinfo b/cpan/DB_File/dbinfo index e6ba7fdefa..2bd46bb484 100644 --- a/cpan/DB_File/dbinfo +++ b/cpan/DB_File/dbinfo @@ -7,7 +7,7 @@ # Version: 1.07 # Date 2nd April 2011 # -# Copyright (c) 1998-2020 Paul Marquess. All rights reserved. +# Copyright (c) 1998-2021 Paul Marquess. All rights reserved. # This program is free software; you can redistribute it and/or # modify it under the same terms as Perl itself. diff --git a/cpan/DB_File/typemap b/cpan/DB_File/typemap index 2cfed9710e..904e5b008b 100644 --- a/cpan/DB_File/typemap +++ b/cpan/DB_File/typemap @@ -1,4 +1,4 @@ -# typemap for Perl 5 interface to Berkeley +# typemap for Perl 5 interface to Berkeley # # written by Paul Marquess <pmqs@cpan.org> # last modified 20th June 2004 @@ -6,7 +6,7 @@ # #################################### DB SECTION # -# +# u_int T_U_INT DB_File T_PTROBJ @@ -22,10 +22,10 @@ T_dbtkeydatum SvGETMAGIC(my_sv) ; if (db->type == DB_RECNO) { if (SvOK(my_sv)) - Value = GetRecnoKey(aTHX_ db, SvIV(my_sv)) ; + Value = GetRecnoKey(aTHX_ db, SvIV(my_sv)) ; else Value = 1 ; - $var.data = & Value; + $var.data = & Value; $var.size = (int)sizeof(recno_t); } else if (SvOK(my_sv)) { |