Deduplicate sockets by path

lib/frajtano.ex

@@ -17,7 +17,8 @@ defmodule Frajtano.Supervisor do
   @impl true
   def init(:ok) do
   	children = [
-  	  {DynamicSupervisor, name: Frajtano.Peer},
+  	  {DynamicSupervisor, name: Frajtano.PeerSupervisor},
+  	  {Registry, keys: :unique, name: Frajtano.Peers},
   	  Frajtano.Agent,
   	  {Task.Supervisor, name: Frajtano.ClientSupervisor},
   	  {Frajtano.Listener, [Application.fetch_env!(:frajtano, :listen_path)]},