Bugfix

If the client object was destroyed prematurely, in some cases
"_process_reply" method have been called on undefined value.

Author: iph0

lib/AnyEvent/RipeRedis.pm

@@ -349,9 +349,7 @@ sub _create_on_read {
     my $handle = shift;
 
     MAIN: while (1) {
-      if ( $handle->destroyed ) {
-        return;
-      }
+      return if $handle->destroyed;
 
       my $reply;
       my $err_code;
@@ -988,6 +986,10 @@ sub AUTOLOAD {
 sub DESTROY {
   my $self = shift;
 
+  if ( defined $self->{_handle} ) {
+    $self->{_handle}->destroy;
+  }
+
   if ( defined $self->{_processing_queue} ) {
     my @queued_commands = $self->_queued_commands;