diff options
Diffstat (limited to 'src/Ssb/Peer/TCP.hs')
| -rw-r--r-- | src/Ssb/Peer/TCP.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Ssb/Peer/TCP.hs b/src/Ssb/Peer/TCP.hs index 59d7f81..67053bb 100644 --- a/src/Ssb/Peer/TCP.hs +++ b/src/Ssb/Peer/TCP.hs @@ -53,7 +53,7 @@ serveBoxStream host port networkID id cmd = case res of Left err -> putStrLn $ "client handshake error: " <> err Right sharedSecrets -> do - let peerID = (fromMaybe undefined $ SH.secretA sharedSecrets) + let peerID = fromMaybe undefined $ SH.secretA sharedSecrets conn <- BoxStream.connectServer socket sharedSecrets case conn of Left err -> putStrLn $ "client error: " <> err |