diff options
author | joe <joe@jerkface.net> | 2017-08-02 01:10:08 -0400 |
---|---|---|
committer | joe <joe@jerkface.net> | 2017-08-02 01:10:08 -0400 |
commit | 4198ce253ea9ef9184b325e4bb8d18fcc483b381 (patch) | |
tree | ee2db363a165e69d7ea9a07ab3d762e86b83f124 /Mainline.hs | |
parent | 8a46b3a8808a15017207bdcea067aa7857a95a11 (diff) |
More Tox stuff.
Diffstat (limited to 'Mainline.hs')
-rw-r--r-- | Mainline.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Mainline.hs b/Mainline.hs index 8ff13390..291a196f 100644 --- a/Mainline.hs +++ b/Mainline.hs | |||
@@ -589,7 +589,7 @@ newClient addr = do | |||
589 | client = Client | 589 | client = Client |
590 | { clientNet = net | 590 | { clientNet = net |
591 | , clientDispatcher = dispatch | 591 | , clientDispatcher = dispatch |
592 | , clientErrorReporter = printErrors stderr | 592 | , clientErrorReporter = ignoreErrors -- printErrors stderr |
593 | , clientPending = map_var | 593 | , clientPending = map_var |
594 | , clientAddress = \maddr -> atomically $ do | 594 | , clientAddress = \maddr -> atomically $ do |
595 | let var = case flip prefer4or6 Nothing <$> maddr of | 595 | let var = case flip prefer4or6 Nothing <$> maddr of |