--- t/01-Redis.t 2009/03/22 18:39:06 40 +++ t/01-Redis.t 2009/03/22 18:42:21 41 @@ -3,7 +3,7 @@ use warnings; use strict; -use Test::More tests => 92; +use Test::More tests => 94; use lib 'lib'; @@ -157,6 +157,9 @@ ok( $o->select( 1 ), 'select' ); ok( $o->exists( 'foo' ), 'exists' ); +ok( $o->flushdb, 'flushdb' ); +cmp_ok( $o->dbsize, '==', 0, 'empty' ); + diag "Connection handling"; ok( $o->quit, 'quit' );