diff options
| author | Adam Kocoloski <adam@cloudant.com> | 2010-10-21 21:48:39 -0400 |
|---|---|---|
| committer | Adam Kocoloski <adam@cloudant.com> | 2010-10-21 21:48:39 -0400 |
| commit | b25b5b1966960a580293a0bdefcf8d290efe9b4d (patch) | |
| tree | cf0b27ef309efc4ba42b9476e907c9f17a8825f5 /apps/rexi/src/rexi_utils.erl | |
| parent | 32f2dd98328c99b4ca80e907d7d164cf44c02824 (diff) | |
use erlang:send_after/3 instead of timer version
http://www.erlang.org/doc/efficiency_guide/commoncaveats.html#id52228
Diffstat (limited to 'apps/rexi/src/rexi_utils.erl')
| -rw-r--r-- | apps/rexi/src/rexi_utils.erl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/apps/rexi/src/rexi_utils.erl b/apps/rexi/src/rexi_utils.erl index 79183951..1e8820e1 100644 --- a/apps/rexi/src/rexi_utils.erl +++ b/apps/rexi/src/rexi_utils.erl @@ -9,7 +9,7 @@ recv(Refs, Keypos, Fun, Acc0, infinity, PerMsgTO) -> process_mailbox(Refs, Keypos, Fun, Acc0, nil, PerMsgTO); recv(Refs, Keypos, Fun, Acc0, GlobalTimeout, PerMsgTO) -> TimeoutRef = erlang:make_ref(), - {ok, TRef} = timer:send_after(GlobalTimeout, {timeout, TimeoutRef}), + {ok, TRef} = erlang:send_after(GlobalTimeout, self(), {timeout, TimeoutRef}), try process_mailbox(Refs, Keypos, Fun, Acc0, TimeoutRef, PerMsgTO) after |