diff options
author | Alexander Sulfrian <alexander@sulfrian.net> | 2010-10-14 14:41:45 +0200 |
---|---|---|
committer | Alexander Sulfrian <alexander@sulfrian.net> | 2010-10-14 14:41:45 +0200 |
commit | 693c92e8dddf6295599ad3e530572e9ff57cb0a5 (patch) | |
tree | 588c59c951e14a143fe8180d71c8103c4f677168 /server | |
parent | 8b696503443d75358d4faf18090662b75915a67e (diff) | |
download | erlang-693c92e8dddf6295599ad3e530572e9ff57cb0a5.tar.gz erlang-693c92e8dddf6295599ad3e530572e9ff57cb0a5.tar.xz erlang-693c92e8dddf6295599ad3e530572e9ff57cb0a5.zip |
added error message
Diffstat (limited to 'server')
-rw-r--r-- | server/dispatcher.erl | 4 |
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} |