From 10440d1d2a277071cc6ef8022aebe76c0b3f0169 Mon Sep 17 00:00:00 2001 From: sunnavy Date: Thu, 22 Apr 2010 02:28:26 +0800 Subject: [PATCH] return undef makes @list = ( undef ), which is sad --- lib/Redis.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/Redis.pm b/lib/Redis.pm index 55fd1a1..8df6779 100644 --- a/lib/Redis.pm +++ b/lib/Redis.pm @@ -153,7 +153,7 @@ sub AUTOLOAD { sub __read_bulk { my ($self,$len) = @_; - return undef if $len < 0; + return if $len < 0; my $v; if ( $len > 0 ) { @@ -168,7 +168,7 @@ sub __read_bulk { sub __read_multi_bulk { my ($self,$size) = @_; - return undef if $size < 0; + return if $size < 0; my $sock = $self->{sock}; $size--; -- 2.20.1