diff options
| author | Lorry Tar Creator <lorry-tar-importer@baserock.org> | 2015-02-17 17:25:57 +0000 |
|---|---|---|
| committer | <> | 2015-03-17 16:26:24 +0000 |
| commit | 780b92ada9afcf1d58085a83a0b9e6bc982203d1 (patch) | |
| tree | 598f8b9fa431b228d29897e798de4ac0c1d3d970 /lang/perl/DB_File/DB_File.pm | |
| parent | 7a2660ba9cc2dc03a69ddfcfd95369395cc87444 (diff) | |
| download | berkeleydb-master.tar.gz | |
Diffstat (limited to 'lang/perl/DB_File/DB_File.pm')
| -rw-r--r-- | lang/perl/DB_File/DB_File.pm | 14 |
1 files changed, 6 insertions, 8 deletions
diff --git a/lang/perl/DB_File/DB_File.pm b/lang/perl/DB_File/DB_File.pm index d7fba44e..9c225ae1 100644 --- a/lang/perl/DB_File/DB_File.pm +++ b/lang/perl/DB_File/DB_File.pm @@ -1,10 +1,8 @@ # DB_File.pm -- Perl 5 interface to Berkeley DB # -# written by Paul Marquess (pmqs@cpan.org) -# last modified 28th October 2007 -# version 1.818 +# Written by Paul Marquess (pmqs@cpan.org) # -# Copyright (c) 1995-2009 Paul Marquess. All rights reserved. +# Copyright (c) 1995-2014 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,17 +163,17 @@ our ($db_version, $use_XSLoader, $splice_end_array_no_length, $splice_end_array, use Carp; -$VERSION = "1.824" ; +$VERSION = "1.828" ; $VERSION = eval $VERSION; # needed for dev releases { - local $SIG{__WARN__} = sub {$splice_end_array_no_length = "@_";}; + local $SIG{__WARN__} = sub {$splice_end_array_no_length = join(" ",@_);}; my @a =(1); splice(@a, 3); $splice_end_array_no_length = ($splice_end_array_no_length =~ /^splice\(\) offset past end of array at /); } { - local $SIG{__WARN__} = sub {$splice_end_array = "@_";}; + local $SIG{__WARN__} = sub {$splice_end_array = join(" ", @_);}; my @a =(1); splice(@a, 3, 1); $splice_end_array = ($splice_end_array =~ /^splice\(\) offset past end of array at /); @@ -2279,7 +2277,7 @@ archive in F<src/misc/db.1.85.tar.gz>. =head1 COPYRIGHT -Copyright (c) 1995-2007 Paul Marquess. All rights reserved. This program +Copyright (c) 1995-2012 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. |