X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBM%2FDeep.pm;h=4d6a9802cfa250c507a3d131423d9e256d293865;hb=9c87a079060af9b367681cd1f96d0abd36745836;hp=1defc2b40a02d9894d7ed2e8681b6065b8449cb3;hpb=97d40a0ac43400f8416c3e930c5626c5cb472a55;p=dbsrgits%2FDBM-Deep.git diff --git a/lib/DBM/Deep.pm b/lib/DBM/Deep.pm index 1defc2b..4d6a980 100644 --- a/lib/DBM/Deep.pm +++ b/lib/DBM/Deep.pm @@ -142,17 +142,17 @@ sub TIEARRAY { sub lock_exclusive { my $self = shift->_get_self; - return $self->_engine->lock_exclusive( $self ); + return $self->_engine->lock_exclusive( $self, @_ ); } *lock = \&lock_exclusive; sub lock_shared { my $self = shift->_get_self; - return $self->_engine->lock_shared( $self ); + return $self->_engine->lock_shared( $self, @_ ); } sub unlock { my $self = shift->_get_self; - return $self->_engine->unlock( $self ); + return $self->_engine->unlock( $self, @_ ); } sub _copy_value {