Parent Directory | Revision Log | Patch
revision 17 by dpavlin, Sun Mar 22 09:22:39 2009 UTC | revision 18 by dpavlin, Sun Mar 22 09:44:30 2009 UTC | |
---|---|---|
# | Line 3 | Line 3 |
3 | use warnings; | use warnings; |
4 | use strict; | use strict; |
5 | ||
6 | use Test::More tests => 53; | use Test::More tests => 54; |
7 | ||
8 | use lib 'lib'; | use lib 'lib'; |
9 | ||
# | Line 78 ok( $@, 'rename to existing key' ); | Line 78 ok( $@, 'rename to existing key' ); |
78 | ok( my $nr_keys = $o->dbsize, 'dbsize' ); | ok( my $nr_keys = $o->dbsize, 'dbsize' ); |
79 | diag "dbsize: $nr_keys"; | diag "dbsize: $nr_keys"; |
80 | ||
81 | diag "Commands operating on lists"; | |
82 | ||
83 | ok( $o->rpush( 'test-list' => 'foo' ), 'rpush' ); | |
84 | ||
85 | ||
86 | ||
87 | ||
88 | ok( $o->quit, 'quit' ); | ok( $o->quit, 'quit' ); |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |