Disabled curve 25519 backport for newer cryptonite library.

1 files changed, 5 insertions, 0 deletions

diff --git a/src/Network/Tox/NodeId.hs b/src/Network/Tox/NodeId.hs
index 0ffc3d22..fbf6702a 100644
--- a/src/Network/Tox/NodeId.hs
+++ b/src/Network/Tox/NodeId.hs
@@ -37,8 +37,13 @@ import Debug.Trace
 import Control.Applicative
 import Control.Arrow
 import Control.Monad
+#ifdef CRYPTONITE_BACKPORT
 import Crypto.Error.Types                     (CryptoFailable (..),
                                                throwCryptoError)
+#else
+import Crypto.Error
+#endif
+
 import Crypto.PubKey.Curve25519
 import qualified Data.Aeson                   as JSON
          ;import Data.Aeson                   (FromJSON, ToJSON, (.=))