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 | |
| parent | 26d38f73993db56811d198a3e0b5c710722dd472 (diff) | |
| download | hmacaroons-b1f77d7e6dcf03dd20c36e1a10429e1b2b9900b1.tar.gz hmacaroons-b1f77d7e6dcf03dd20c36e1a10429e1b2b9900b1.tar.zst hmacaroons-b1f77d7e6dcf03dd20c36e1a10429e1b2b9900b1.zip | |
Refactor tests
Diffstat (limited to 'src')
| -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 |