aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAlexander Sulfrian <alexander@sulfrian.net>2010-10-14 14:41:45 +0200
committerAlexander Sulfrian <alexander@sulfrian.net>2010-10-14 14:41:45 +0200
commit693c92e8dddf6295599ad3e530572e9ff57cb0a5 (patch)
tree588c59c951e14a143fe8180d71c8103c4f677168
parent8b696503443d75358d4faf18090662b75915a67e (diff)
downloaderlang-693c92e8dddf6295599ad3e530572e9ff57cb0a5.tar.gz
erlang-693c92e8dddf6295599ad3e530572e9ff57cb0a5.tar.xz
erlang-693c92e8dddf6295599ad3e530572e9ff57cb0a5.zip
added error message
-rw-r--r--server/dispatcher.erl4
1 files changed, 2 insertions, 2 deletions
diff --git a/server/dispatcher.erl b/server/dispatcher.erl
index 9b4c61b..77e4ab9 100644
--- a/server/dispatcher.erl
+++ b/server/dispatcher.erl
@@ -34,8 +34,8 @@ handle({login, {Node, User, Password}}, Dict) ->
case client:start(Node) of
{ok, Pid} ->
{{ok, {logged_in, Pid}}, Dict};
- _ ->
- {{error, unable_to_login}, Dict}
+ Why ->
+ {{error, {unable_to_login, Why}}, Dict}
end;
_ ->
{{error, user_or_password_invalid}, Dict}