aboutsummaryrefslogtreecommitdiffstats
path: root/server
diff options
context:
space:
mode:
authorAlexander Sulfrian <alexander@sulfrian.net>2010-10-14 10:25:44 +0200
committerAlexander Sulfrian <alexander@sulfrian.net>2010-10-14 10:25:44 +0200
commitaa16b66ce4c64dd165292f5fb931d57f09d436d6 (patch)
tree786631e17528772ec71a6d578a322e2afe23a662 /server
parent9b5db7ab37a4a2527d523ff39bb0c5525553119e (diff)
downloaderlang-aa16b66ce4c64dd165292f5fb931d57f09d436d6.tar.gz
erlang-aa16b66ce4c64dd165292f5fb931d57f09d436d6.tar.xz
erlang-aa16b66ce4c64dd165292f5fb931d57f09d436d6.zip
removed name in server module
use references for assign the answers to the client
Diffstat (limited to 'server')
-rw-r--r--server/client.erl12
1 files changed, 6 insertions, 6 deletions
diff --git a/server/client.erl b/server/client.erl
index 31d382f..ab55b3d 100644
--- a/server/client.erl
+++ b/server/client.erl
@@ -3,13 +3,13 @@
start(Node) ->
process_flag(trap_exit, true),
- {Client, Ref} = server:start_on_node(Node, client, undef),
+ Client = server:start_on_node(Node, client, undef),
link(Client),
- Server = spawn_link(client, loop, [{Client, Ref}]),
+ Server = spawn_link(client, loop, [Client]),
- case server:rpc({Client, Ref}, {change_state, Server}) of
+ case server:rpc(Client, {change_state, Server}) of
{ok} ->
- {ok, {Client, Ref}};
+ {ok, Client};
_ ->
{error, unknown_error}
end.
@@ -17,11 +17,11 @@ start(Node) ->
loop(Client) ->
receive
list ->
- server:send(Client, {ok, {foo}}),
+ Client ! {ok, {foo}},
loop(Client);
Cmd ->
- server:send(Client, {error, {unknown_command, Cmd}}),
+ Client ! {error, {unknown_command, Cmd}},
loop(Client)
end.