From 446d0ef9d7fefd3ba0d3ce2640bf53b4a102de7f Mon Sep 17 00:00:00 2001 From: Dimitri Sokolyuk Date: Mon, 9 Nov 2015 01:34:33 +0100 Subject: Pull API call back into module --- src/pbx_conn.erl | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) (limited to 'src/pbx_conn.erl') diff --git a/src/pbx_conn.erl b/src/pbx_conn.erl index 0ea0d3f..af3dbc0 100644 --- a/src/pbx_conn.erl +++ b/src/pbx_conn.erl @@ -5,6 +5,7 @@ -export([start_link/0]). -export([init/1, handle_call/3, handle_cast/2, handle_info/2, terminate/2, code_change/3]). +-export([send/1]). -include("config.hrl"). @@ -12,7 +13,7 @@ start_link() -> gen_server:start_link({local, ?SERVER}, ?MODULE, [?HOST, ?PORT], []). init(Args) -> - gen_server:cast(?SERVER, pbx_acse:associate()), + send(pbx_acse:associate()), [Host, Port] = Args, gen_tcp:connect(Host, Port, [binary, {packet, 2}]). @@ -37,8 +38,11 @@ handle_info({tcp_closed, _}, Socket) -> {stop, normal, Socket}. terminate(_Reason, Socket) -> - gen_server:cast(?SERVER, pbx_acse:release()), + send(pbx_acse:release()), gen_tcp:close(Socket). code_change(_OldVsn, Socket, _Extra) -> {ok, Socket}. + +send(Reply) -> + gen_server:cast(?SERVER, Reply). -- cgit v1.2.3