summaryrefslogtreecommitdiff
path: root/tda.erl
diff options
context:
space:
mode:
authorDimitri Sokolyuk <demon@dim13.org>2015-10-27 16:52:59 +0100
committerDimitri Sokolyuk <demon@dim13.org>2015-10-27 16:52:59 +0100
commit740b9a23a75d031bce3914d23665368afa522695 (patch)
treee8542aff4f7bc5fa0914e9bed4b2e546f939052f /tda.erl
parent282f7b5940870986266bc1761a9d481d080f9745 (diff)
Cleanup
Diffstat (limited to 'tda.erl')
-rw-r--r--tda.erl7
1 files changed, 2 insertions, 5 deletions
diff --git a/tda.erl b/tda.erl
index b2e7042..2a38d89 100644
--- a/tda.erl
+++ b/tda.erl
@@ -59,17 +59,14 @@ decode(Sock, Msg) ->
rose ->
{ok, Rose} = rose:decode(Msg),
io:format("ROSE> ~p~n", [Rose]),
- rose_handler(Sock, Rose);
+ {ok, Result} = rose:dispatch(Rose),
+ gen_tcp:send(Sock, Result);
acse ->
{ok, Acse} = acse:decode(Msg),
io:format("ACSE> ~p~n", [Acse]),
acse:accepted(Acse)
end.
-rose_handler(Sock, {invoke, Msg}) ->
- gen_tcp:send(Sock, rose:dispatch(Msg)),
- ok.
-
dispatch(<<Head:8,_/binary>>) ->
case Head of
96 -> acse;