summaryrefslogtreecommitdiff
path: root/src/pbx_conn.erl
diff options
context:
space:
mode:
Diffstat (limited to 'src/pbx_conn.erl')
-rw-r--r--src/pbx_conn.erl8
1 files changed, 6 insertions, 2 deletions
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).