Better diagnostics when authentication fails.

1 files changed, 5 insertions, 3 deletions

diff --git a/src/rabbit_access_control.erl b/src/rabbit_access_control.erl
index 30bcc9f3..c15a4de9 100644
--- a/src/rabbit_access_control.erl
+++ b/src/rabbit_access_control.erl
@@ -109,14 +109,16 @@ user_pass_login(User, Pass) ->
     end.
 
 check_user_pass_login(Username, Pass) ->
+    Refused = {refused, io_lib:format("user '~s' - invalid credentials",
+                                      [Username])},
     case lookup_user(Username) of
         {ok, User} ->
             case check_password(Pass, User#user.password_hash) of
-                true -> {ok,      User};
-                _    -> {refused, Username}
+                true -> {ok, User};
+                _    -> Refused
             end;
         {error, not_found} ->
-            {refused, Username}
+            Refused
     end.
 
 internal_lookup_vhost_access(Username, VHostPath) ->