diff options
author | Julien Tanguy <julien.tanguy@jhome.fr> | 2015-04-14 18:18:26 +0200 |
---|---|---|
committer | Julien Tanguy <julien.tanguy@jhome.fr> | 2015-04-14 18:18:26 +0200 |
commit | b1f77d7e6dcf03dd20c36e1a10429e1b2b9900b1 (patch) | |
tree | 0ce2d7d6164de6c254ec4022072430045109a30f /src/Crypto/Macaroon | |
parent | 26d38f73993db56811d198a3e0b5c710722dd472 (diff) | |
download | hmacaroons-b1f77d7e6dcf03dd20c36e1a10429e1b2b9900b1.tar.gz hmacaroons-b1f77d7e6dcf03dd20c36e1a10429e1b2b9900b1.tar.zst hmacaroons-b1f77d7e6dcf03dd20c36e1a10429e1b2b9900b1.zip |
Refactor tests
Diffstat (limited to 'src/Crypto/Macaroon')
-rw-r--r-- | src/Crypto/Macaroon/Serializer/Base64.hs | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/src/Crypto/Macaroon/Serializer/Base64.hs b/src/Crypto/Macaroon/Serializer/Base64.hs index 6fc8fcb..f6527c2 100644 --- a/src/Crypto/Macaroon/Serializer/Base64.hs +++ b/src/Crypto/Macaroon/Serializer/Base64.hs | |||
@@ -16,22 +16,22 @@ module Crypto.Macaroon.Serializer.Base64 ( | |||
16 | , deserialize | 16 | , deserialize |
17 | ) where | 17 | ) where |
18 | 18 | ||
19 | import Control.Applicative | 19 | import Control.Applicative |
20 | import Control.Monad | 20 | import Control.Monad |
21 | import qualified Data.ByteString as BS | 21 | import Crypto.Macaroon.Internal |
22 | import qualified Data.ByteString.Base64.URL as B64 | 22 | import Data.Attoparsec.ByteString |
23 | import qualified Data.ByteString.Char8 as B8 | ||
24 | import Data.Attoparsec.ByteString | ||
25 | import qualified Data.Attoparsec.ByteString.Char8 as A8 | 23 | import qualified Data.Attoparsec.ByteString.Char8 as A8 |
26 | import Data.Bits | 24 | import Data.Bits |
25 | import qualified Data.ByteString as BS | ||
26 | import qualified Data.ByteString.Base64.URL as B64 | ||
27 | import qualified Data.ByteString.Char8 as B8 | ||
27 | import Data.Char | 28 | import Data.Char |
28 | import Data.Hex | 29 | import Data.Hex |
29 | import Data.Int | 30 | import Data.Int |
30 | import Data.List | 31 | import Data.List |
31 | import Data.Maybe | 32 | import Data.Maybe |
32 | import Data.Word | ||
33 | import Data.Serialize | 33 | import Data.Serialize |
34 | import Crypto.Macaroon.Internal | 34 | import Data.Word |
35 | 35 | ||
36 | 36 | ||
37 | -- | Serialize a macaroon in an URL-safe Base64 encoding | 37 | -- | Serialize a macaroon in an URL-safe Base64 encoding |