go back to lists:map

I think it makes sense using map/2 when changing a list, like here,
and use list comprehensions when filtering and bulding _other_ lists.

1 files changed, 5 insertions, 4 deletions

diff --git a/p11p-daemon/src/p11p_remote_manager.erl b/p11p-daemon/src/p11p_remote_manager.erl
index 8ff8883..5fe5bc7 100644
--- a/p11p-daemon/src/p11p_remote_manager.erl
+++ b/p11p-daemon/src/p11p_remote_manager.erl
@@ -101,10 +101,11 @@ handle_cast({client_event, client_gone, [TokName, Pid]}, #state{tokens = Tokens}
     p11p_remote:stop(Pid, normal),
     #{TokName := Token} = Tokens,
     Remotes = Token#token.remotes,
-    NewRemotes = [case E#remote.pid of
-		      Pid -> E#remote{pid = undefined};
-		      _ -> E
-		  end || E <- Remotes],
+    NewRemotes = lists:map(fun(E) ->
+				   case E#remote.pid of
+				       Pid -> E#remote{pid = undefined};
+				       _ -> E
+				   end end, Remotes),
     NewToken = Token#token{remotes = NewRemotes},
     NewState = State#state{tokens = Tokens#{TokName := NewToken}},
     {noreply, NewState};