Skip to content

Commit

Permalink
Refactored.
Browse files Browse the repository at this point in the history
  • Loading branch information
baphled committed Mar 21, 2009
1 parent d42eb4c commit 75d911b
Showing 1 changed file with 6 additions and 11 deletions.
17 changes: 6 additions & 11 deletions lib/chatterl/src/chatterl_store.erl
Expand Up @@ -54,20 +54,15 @@ stop() ->
%% @end
%%--------------------------------------------------------------------
register(Nickname,{User,Email,Password1,Password2}) ->
case gen_server:call({global,chatterl_serv},{user_exists,Nickname}) of
case Password1 =:= Password2 of
false ->
{error,lists:append(Nickname," is not connected")};
{error,lists:append(Nickname,"'s passwords must match")};
true ->
case Password1 =:= Password2 of
false ->
{error,lists:append(Nickname,"'s passwords must match")};
case is_auth(Nickname,Password1) of
true ->
case is_auth(Nickname,Password1) of
true ->
{error,lists:append(Nickname," is already registered")};
false ->
create_user(Nickname,{User,Email,Password1})
end
{error,lists:append(Nickname," is already registered")};
false ->
create_user(Nickname,{User,Email,Password1})
end
end.

Expand Down

0 comments on commit 75d911b

Please sign in to comment.