X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=ext%2FDB_File%2FDB_File.pm;h=3bdadede043e118cfec1ca43c09acb7fb0d7cf8d;hb=6ff38c2790dea060035b4175aa870de4adce00c9;hp=ccaf44f0c7293dd40621db4e20dd38c9aaba488d;hpb=d6067fe31ede7f6e23962055018443b632541189;p=p5sagit%2Fp5-mst-13.2.git diff --git a/ext/DB_File/DB_File.pm b/ext/DB_File/DB_File.pm index ccaf44f..3bdaded 100644 --- a/ext/DB_File/DB_File.pm +++ b/ext/DB_File/DB_File.pm @@ -1,8 +1,8 @@ # DB_File.pm -- Perl 5 interface to Berkeley DB # # written by Paul Marquess (pmqs@cpan.org) -# last modified 31st October 2005 -# version 1.813 +# last modified 11th November 2005 +# version 1.814 # # Copyright (c) 1995-2005 Paul Marquess. All rights reserved. # This program is free software; you can redistribute it and/or @@ -161,11 +161,11 @@ package DB_File ; use warnings; use strict; our ($VERSION, @ISA, @EXPORT, $AUTOLOAD, $DB_BTREE, $DB_HASH, $DB_RECNO); -our ($db_version, $use_XSLoader, $splice_end_array); +our ($db_version, $use_XSLoader, $splice_end_array, $Error); use Carp; -$VERSION = "1.813" ; +$VERSION = "1.814" ; { local $SIG{__WARN__} = sub {$splice_end_array = "@_";};