greg/wterl
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Indention

Browse source
This commit is contained in:
Gregory Burd 2013-03-21 14:12:03 -04:00
parent b905cce833
commit 9ab363adfe
1 changed files with 9 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
src/wterl_conn.erl
View file

@ -81,14 +81,15 @@ init([]) ->
{ok, #state{}}. {ok, #state{}}.
handle_call({open, Dir, Config, Caller}, _From, #state{conn=undefined}=State) -> handle_call({open, Dir, Config, Caller}, _From, #state{conn=undefined}=State) ->
{Reply, NState} = case wterl:conn_open(Dir, wterl:config_to_bin(Config)) of {Reply, NState} =
{ok, ConnRef}=OK -> case wterl:conn_open(Dir, wterl:config_to_bin(Config)) of
Monitor = erlang:monitor(process, Caller), {ok, ConnRef}=OK ->
true = ets:insert(wterl_ets, {Monitor, Caller}), Monitor = erlang:monitor(process, Caller),
{OK, State#state{conn = ConnRef}}; true = ets:insert(wterl_ets, {Monitor, Caller}),
Error -> {OK, State#state{conn = ConnRef}};
{Error, State} Error ->
end, {Error, State}
end,
{reply, Reply, NState}; {reply, Reply, NState};
handle_call({open, _Dir, _Config, Caller}, _From,#state{conn=ConnRef}=State) -> handle_call({open, _Dir, _Config, Caller}, _From,#state{conn=ConnRef}=State) ->
Monitor = erlang:monitor(process, Caller), Monitor = erlang:monitor(process, Caller),