From 2303f31c2b22d0f4af93c44d18e064cbead85822 Mon Sep 17 00:00:00 2001
From: Philipp Balzarek
Date: Tue, 9 Apr 2013 17:22:56 +0200
Subject: [PATCH] use cryptohash-cryptoapi (cryptohash 0.9 deprecates cryptoapi
api)
---
source/Network/Xmpp/Sasl/Mechanisms/Scram.hs | 16 ++++++++--------
1 file changed, 8 insertions(+), 8 deletions(-)
diff --git a/source/Network/Xmpp/Sasl/Mechanisms/Scram.hs b/source/Network/Xmpp/Sasl/Mechanisms/Scram.hs
index d7a5515..01ce054 100644
--- a/source/Network/Xmpp/Sasl/Mechanisms/Scram.hs
+++ b/source/Network/Xmpp/Sasl/Mechanisms/Scram.hs
@@ -9,15 +9,15 @@ module Network.Xmpp.Sasl.Mechanisms.Scram
import Control.Applicative ((<$>))
import Control.Monad.Error
import Control.Monad.State.Strict
-import qualified Crypto.Classes as Crypto
-import qualified Crypto.HMAC as Crypto
-import qualified Crypto.Hash.SHA1 as Crypto
-import qualified Data.ByteString as BS
-import qualified Data.ByteString.Base64 as B64
-import Data.ByteString.Char8 as BS8 (unpack)
+import qualified Crypto.Classes as Crypto
+import qualified Crypto.HMAC as Crypto
+import qualified Crypto.Hash.CryptoAPI as Crypto
+import qualified Data.ByteString as BS
+import qualified Data.ByteString.Base64 as B64
+import Data.ByteString.Char8 as BS8 (unpack)
import Data.List (foldl1', genericTake)
-import qualified Data.Text as Text
-import qualified Data.Text.Encoding as Text
+import qualified Data.Text as Text
+import qualified Data.Text.Encoding as Text
import Network.Xmpp.Sasl.Common
import Network.Xmpp.Sasl.Types
import Network.Xmpp.Types