@@ -342,9 +342,9 @@ leader_cast(Name, Request) -> ok. -do_cast(Tag, Name, Request) when atom(Name) -> +do_cast(Tag, Name, Request) when is_atom(Name) -> Name ! {Tag, Request}; -do_cast(Tag, Pid, Request) when pid(Pid) -> +do_cast(Tag, Pid, Request) when is_pid(Pid) -> Pid ! {Tag, Request}. @@ -565,7 +565,7 @@ safe_loop(#server{mod = Mod, state = State} = Server, Role, %% We are only monitoring one proc, the leader! Node = case From of {Name,_Node} -> _Node; - _ when pid(From) -> node(From) + _ when is_pid(From) -> node(From) end, case Node == E#election.leadernode of true -> @@ -579,7 +579,7 @@ safe_loop(#server{mod = Mod, state = State} = Server, Role, {'DOWN',Ref,process,From,_Reason} = Msg -> Node = case From of {Name,_Node} -> _Node; - _ when pid(From) -> node(From) + _ when is_pid(From) -> node(From) end, NewMon = E#election.monitored -- [{Ref,Node}], case lists:member(Node,E#election.candidate_nodes) of @@ -747,7 +747,7 @@ loop(#server{parent = Parent, %% We are only monitoring one proc, the leader! Node = case From of {Name,_Node} -> _Node; - _ when pid(From) -> node(From) + _ when is_pid(From) -> node(From) end, case Node == E#election.leadernode of true -> @@ -761,7 +761,7 @@ loop(#server{parent = Parent, {'DOWN',Ref,process,From,_Reason} -> Node = case From of {Name,_Node} -> _Node; - _ when pid(From) -> node(From) + _ when is_pid(From) -> node(From) end, NewMon = E#election.monitored -- [{Ref,Node}], case lists:member(Node,E#election.candidate_nodes) of @@ -1135,7 +1135,7 @@ mon_nodes(E,Nodes) -> mon_node(E,Proc) -> Node = case Proc of {_Name,Node_} -> Node_; - Pid when pid(Pid) -> node(Pid) + Pid when is_pid(Pid) -> node(Pid) end, case iselem(Node,E#election.monitored) of true -> hanssv+serge_version/gen_leader.erl 18069d151bd91f727d651c02fb73920eb22058bd Andrew Thompson andrew@freecpx.dev http://github.com/KirinDave/gen_leader_revival/commit/b58076c6691f0b5b9639f3bb364f531dac44ca79 b58076c6691f0b5b9639f3bb364f531dac44ca79 2009-05-20T17:21:48-07:00 2009-05-20T13:53:27-07:00 Fix obsolete guards 7b6b5e653f2eb9660c7421cfbb9564adaae5a0ae Andrew Thompson andrew@freecpx.dev