From: Dobrica Pavlinusic Date: Wed, 17 Jun 2009 16:47:06 +0000 (+0000) Subject: test that info returns HASH X-Git-Tag: 0.0801~5 X-Git-Url: http://git.rot13.org/?p=perl-Redis.git;a=commitdiff_plain;h=223e1a0a42ff4f4de939abd88633ea3cc213f92b test that info returns HASH git-svn-id: svn+ssh://llin/home/dpavlin/private/svn/Redis@58 447b33ff-793d-4489-8442-9bea7d161be5 --- diff --git a/t/01-Redis.t b/t/01-Redis.t index ddb3da6..4dc7a85 100755 --- a/t/01-Redis.t +++ b/t/01-Redis.t @@ -3,7 +3,7 @@ use warnings; use strict; -use Test::More tests => 106; +use Test::More tests => 107; use Data::Dump qw/dump/; use lib 'lib'; @@ -182,6 +182,7 @@ diag "shutdown not tested"; diag "Remote server control commands"; ok( my $info = $o->info, 'info' ); +isa_ok( $info, 'HASH' ); diag dump( $info ); diag "Connection handling";