summaryrefslogtreecommitdiff
path: root/src/Network/Tox
diff options
context:
space:
mode:
Diffstat (limited to 'src/Network/Tox')
-rw-r--r--src/Network/Tox/DHT/Handlers.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Network/Tox/DHT/Handlers.hs b/src/Network/Tox/DHT/Handlers.hs
index dd586430..0dea53ad 100644
--- a/src/Network/Tox/DHT/Handlers.hs
+++ b/src/Network/Tox/DHT/Handlers.hs
@@ -372,7 +372,7 @@ updateRouting client routing orouter naddr msg
372 | otherwise = do 372 | otherwise = do
373 case prefer4or6 naddr Nothing of 373 case prefer4or6 naddr Nothing of
374 Want_IP4 -> updateTable client naddr orouter (committee4 routing) (refresher4 routing) 374 Want_IP4 -> updateTable client naddr orouter (committee4 routing) (refresher4 routing)
375 Want_IP6 -> updateTable client naddr orouter (committee6 routing) (refresher4 routing) 375 Want_IP6 -> updateTable client naddr orouter (committee6 routing) (refresher6 routing)
376 Want_Both -> do hPutStrLn stderr "BUG:unreachable" 376 Want_Both -> do hPutStrLn stderr "BUG:unreachable"
377 error $ "BUG:unreachable at " ++ __FILE__ ++ ":" ++ show __LINE__ 377 error $ "BUG:unreachable at " ++ __FILE__ ++ ":" ++ show __LINE__
378 378