diff options
Diffstat (limited to 'src/Network/Tox/Onion')
-rw-r--r-- | src/Network/Tox/Onion/Handlers.hs | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/Network/Tox/Onion/Handlers.hs b/src/Network/Tox/Onion/Handlers.hs index e792aa50..af515315 100644 --- a/src/Network/Tox/Onion/Handlers.hs +++ b/src/Network/Tox/Onion/Handlers.hs | |||
@@ -1,3 +1,4 @@ | |||
1 | {-# LANGUAGE CPP #-} | ||
1 | {-# LANGUAGE LambdaCase #-} | 2 | {-# LANGUAGE LambdaCase #-} |
2 | {-# LANGUAGE PatternSynonyms #-} | 3 | {-# LANGUAGE PatternSynonyms #-} |
3 | module Network.Tox.Onion.Handlers where | 4 | module Network.Tox.Onion.Handlers where |
@@ -11,8 +12,12 @@ import qualified Network.QueryResponse as QR (Client) | |||
11 | import Crypto.Tox | 12 | import Crypto.Tox |
12 | import qualified Data.Wrapper.PSQ as PSQ | 13 | import qualified Data.Wrapper.PSQ as PSQ |
13 | ;import Data.Wrapper.PSQ (PSQ) | 14 | ;import Data.Wrapper.PSQ (PSQ) |
15 | #ifdef CRYPTONITE_BACKPORT | ||
14 | import Crypto.Error.Types (CryptoFailable (..), | 16 | import Crypto.Error.Types (CryptoFailable (..), |
15 | throwCryptoError) | 17 | throwCryptoError) |
18 | #else | ||
19 | import Crypto.Error | ||
20 | #endif | ||
16 | import Control.Arrow | 21 | import Control.Arrow |
17 | 22 | ||
18 | import System.IO | 23 | import System.IO |