use warnings;
use strict;
-use Test::More tests => 9;
+use Test::More tests => 8;
use lib 'lib';
-use Data::Dump qw/dump/;
BEGIN {
use_ok( 'Redis::List' );
isa_ok( $o, 'Redis::List' );
-ok( $o->CLEAR, 'CLEAR' );
+$o->CLEAR;
ok( ! @a, 'empty list' );
ok( push( @a, 'push' ), 'push' );
is_deeply( [ @a ], [ 'foo', 'bar', 'baz', 'push' ] );
-diag dump( @a );