--- t/01-Redis.t 2009/03/21 23:39:53 16 +++ t/01-Redis.t 2009/03/22 09:22:39 17 @@ -3,7 +3,7 @@ use warnings; use strict; -use Test::More tests => 52; +use Test::More tests => 53; use lib 'lib'; @@ -75,4 +75,7 @@ eval { $o->rename( 'test-decrby', 'test-renamed', 1 ) }; ok( $@, 'rename to existing key' ); +ok( my $nr_keys = $o->dbsize, 'dbsize' ); +diag "dbsize: $nr_keys"; + ok( $o->quit, 'quit' );