From 75d911bc91e0185093d19c9b11b29c4f0140f429 Mon Sep 17 00:00:00 2001
From: Yomi Colledge <baphled@boodah.net>
Date: Sat, 21 Mar 2009 22:52:48 +0000
Subject: [PATCH] Refactored.

---
 lib/chatterl/src/chatterl_store.erl | 17 ++++++-----------
 1 file changed, 6 insertions(+), 11 deletions(-)

diff --git a/lib/chatterl/src/chatterl_store.erl b/lib/chatterl/src/chatterl_store.erl
index 8edb015..3d52903 100644
--- a/lib/chatterl/src/chatterl_store.erl
+++ b/lib/chatterl/src/chatterl_store.erl
@@ -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.