X-Git-Url: http://git.rot13.org/?p=perl-Redis.git;a=blobdiff_plain;f=lib%2FRedis.pm;fp=lib%2FRedis.pm;h=6b1a457b7f7fbc93cae97be29e257ea1fbbb6b36;hp=09db12b81f9507250f35c68832cc6209a25a8475;hb=ce60ba7c752250057f129ff30996ac1d0dbd4aff;hpb=6255eeeb7fb4da510289888a086477f03194ef97

diff --git a/lib/Redis.pm b/lib/Redis.pm
index 09db12b..6b1a457 100644
--- a/lib/Redis.pm
+++ b/lib/Redis.pm
@@ -144,9 +144,7 @@ sub AUTOLOAD {
 		}
 		return $hash;
 	} elsif ( $command eq 'keys' ) {
-		my $keys = $self->__read_bulk($result);
-		return split(/\s/, $keys) if $keys;
-		return;
+		return $self->__read_multi_bulk($result);
 	}
 
 	if ( $type eq '-' ) {