From 740b9a23a75d031bce3914d23665368afa522695 Mon Sep 17 00:00:00 2001 From: Dimitri Sokolyuk Date: Tue, 27 Oct 2015 16:52:59 +0100 Subject: Cleanup --- tda.erl | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) (limited to 'tda.erl') 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(<>) -> case Head of 96 -> acse; -- cgit v1.2.3