1 files changed, 1 insertions, 0 deletions

diff --git a/src/Network/DHT/Types.hs b/src/Network/DHT/Types.hs
index 91d1fc22..73a7be65 100644
--- a/src/Network/DHT/Types.hs
+++ b/src/Network/DHT/Types.hs
@@ -78,6 +78,7 @@ foundNodesMessage ns = NodeFound ns
 class Kademlia dht where
     data DHTData dht ip
     dhtAdjustID :: Address ip => Proxy dht -> NodeId dht -> SockAddr -> Event dht ip u -> NodeId dht
+    dhtAdjustID _ nid _ _ = nid
     namePing :: Proxy dht -> QueryMethod dht
     nameFindNodes :: Proxy dht -> QueryMethod dht
     initializeDHTData :: IO (DHTData dht ip)