From: rkinyon Date: Fri, 24 Feb 2006 05:11:19 +0000 (+0000) Subject: Added failing test X-Git-Tag: 0-97~4 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=25369e065de96591e6a90394c1554fef52055cf3;p=dbsrgits%2FDBM-Deep.git Added failing test --- diff --git a/t/07_locking.t b/t/07_locking.t index 58ea83f..e2b94dd 100644 --- a/t/07_locking.t +++ b/t/07_locking.t @@ -2,7 +2,7 @@ # DBM::Deep Test ## use strict; -use Test::More tests => 3; +use Test::More tests => 4; use_ok( 'DBM::Deep' ); @@ -24,6 +24,9 @@ if ($db->error()) { $db->{key1} = "value1"; is( $db->{key1}, "value1", "key1 is set" ); +$db->{key2} = [ 1 .. 3 ]; +is( $db->{key2}[1], 2 ); + ## # explicit lock ##