Use lists:keysearch/3 instead of lists:keyfind/3. #4

Merged
merged 1 commit into from Jun 5, 2012
Jump to file or symbol
Failed to load files and symbols.
+2 −2
Split
View
@@ -1443,8 +1443,8 @@ mon_handle_req({monitor, P}, From, Refs) ->
{_Name, N} -> N;
Pid when is_pid(Pid) -> node(Pid)
end,
- case lists:keyfind(Node, 2, Refs) of
- {_, Ref} ->
+ case lists:keysearch(Node, 2, Refs) of
+ {value, {_, Ref}} ->
mon_reply(From, {Ref,Node}),
Refs;
false ->