From 42c7e85689505fc719088c613f1dc4bc52752643 Mon Sep 17 00:00:00 2001
From: joe <joe@jerkface.net>
Date: Tue, 11 Jul 2017 13:03:13 -0400
Subject: Added DHT name to listener thread label.

---
 examples/dhtd.hs | 1 +
 1 file changed, 1 insertion(+)

(limited to 'examples')

diff --git a/examples/dhtd.hs b/examples/dhtd.hs
index 15db79ea..ab256831 100644
--- a/examples/dhtd.hs
+++ b/examples/dhtd.hs
@@ -167,6 +167,7 @@ godht ::
     , Pretty (NodeInfo dht IPv4 u)
     , Default u
     , Show u
+    , Typeable dht
     ) => String -> (NodeAddr IPv4 -> NodeId dht -> DHT raw dht u IPv4 b) -> IO b
 godht p f = do
     a <- btBindAddr p False
-- 
cgit v1.2.3