diff options
Diffstat (limited to 'examples/dhtd.hs')
-rw-r--r-- | examples/dhtd.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/examples/dhtd.hs b/examples/dhtd.hs index e95fa366..2b5974f1 100644 --- a/examples/dhtd.hs +++ b/examples/dhtd.hs | |||
@@ -629,7 +629,7 @@ clientSession s@Session{..} sock cnum h = do | |||
629 | return $ [ maybe "none" show cp | 629 | return $ [ maybe "none" show cp |
630 | , maybe "" (show . Tox.key2id . Tox.dhtpk . snd) ck | 630 | , maybe "" (show . Tox.key2id . Tox.dhtpk . snd) ck |
631 | , maybe "" (show . snd) ca | 631 | , maybe "" (show . snd) ca |
632 | , maybe "" (T.unpack . T.decodeUtf8 . Tox.friendRequestText . snd) cf | 632 | , maybe "" (show . T.decodeUtf8 . Tox.friendRequestText . snd) cf |
633 | ] | 633 | ] |
634 | return $ do | 634 | return $ do |
635 | forM_ (HashMap.toList css) $ \(me,xss) -> do | 635 | forM_ (HashMap.toList css) $ \(me,xss) -> do |