Slight improvement

Made that the client do not reconnects on the error
"Client sent AUTH, but no password is set".

Author: iph0

Changes

@@ -1,5 +1,9 @@
 Revision history for AnyEvent::RipeRedis.
 
+0.44 Fri Dec 1 12:09:02 MSK 2017
+  - Made that the client do not reconnects on the error
+    "Client sent AUTH, but no password is set".
+
 0.42 Sat Apr 1 15:49:15 MSK 2017
   - README.pod replaced by README.md.
 

lib/AnyEvent/RipeRedis.pm

@@ -5,7 +5,7 @@ use strict;
 use warnings;
 use base qw( Exporter );
 
-our $VERSION = '0.42';
+our $VERSION = '0.44';
 
 use AnyEvent::RipeRedis::Error;
 
@@ -646,7 +646,9 @@ sub _auth {
       on_reply => sub {
         my $err = $_[1];
 
-        if ( defined $err ) {
+        if ( defined $err
+          && $err->message ne 'ERR Client sent AUTH, but no password is set' )
+        {
           $self->{_auth_state} = S_NEED_DO;
           $self->_abort($err);
 

lib/AnyEvent/RipeRedis/Error.pm

@@ -4,7 +4,7 @@ use 5.008000;
 use strict;
 use warnings;
 
-our $VERSION = '0.42';
+our $VERSION = '0.44';
 
 our %ERROR_CODES = (
   E_CANT_CONN                  => 1,