From b25b5b1966960a580293a0bdefcf8d290efe9b4d Mon Sep 17 00:00:00 2001 From: Adam Kocoloski Date: Thu, 21 Oct 2010 21:48:39 -0400 Subject: use erlang:send_after/3 instead of timer version http://www.erlang.org/doc/efficiency_guide/commoncaveats.html#id52228 --- apps/mem3/src/mem3_cache.erl | 2 +- apps/mem3/src/mem3_nodes.erl | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) (limited to 'apps/mem3/src') diff --git a/apps/mem3/src/mem3_cache.erl b/apps/mem3/src/mem3_cache.erl index 419e0d7c..6614c29e 100644 --- a/apps/mem3/src/mem3_cache.erl +++ b/apps/mem3/src/mem3_cache.erl @@ -45,7 +45,7 @@ handle_info({'DOWN', _, _, Pid, {badarg, [{ets,delete,[partitions,_]}|_]}}, handle_info({'DOWN', _, _, Pid, Reason}, #state{changes_pid=Pid} = State) -> ?LOG_INFO("~p changes listener died ~p", [?MODULE, Reason]), Seq = case Reason of {seq, EndSeq} -> EndSeq; _ -> 0 end, - timer:send_after(5000, {start_listener, Seq}), + erlang:send_after(5000, self(), {start_listener, Seq}), {noreply, State}; handle_info({start_listener, Seq}, State) -> {NewPid, _} = spawn_monitor(fun() -> listen_for_changes(Seq) end), diff --git a/apps/mem3/src/mem3_nodes.erl b/apps/mem3/src/mem3_nodes.erl index c8528cb6..f9320598 100644 --- a/apps/mem3/src/mem3_nodes.erl +++ b/apps/mem3/src/mem3_nodes.erl @@ -53,7 +53,7 @@ handle_info({'DOWN', _, _, Pid, Reason}, #state{changes_pid=Pid} = State) -> ?LOG_INFO("~p changes listener died ~p", [?MODULE, Reason]), StartSeq = State#state.update_seq, Seq = case Reason of {seq, EndSeq} -> EndSeq; _ -> StartSeq end, - timer:send_after(5000, start_listener), + erlang:send_after(5000, self(), start_listener), {noreply, State#state{update_seq = Seq}}; handle_info(start_listener, #state{update_seq = Seq} = State) -> {NewPid, _} = spawn_monitor(fun() -> listen_for_changes(Seq) end), -- cgit v1.2.3