diff options
author | Julien Tanguy <julien.tanguy@jhome.fr> | 2015-05-06 13:53:36 +0200 |
---|---|---|
committer | Julien Tanguy <julien.tanguy@jhome.fr> | 2015-05-06 13:53:36 +0200 |
commit | 7986de7cc40d5c063805b060c1796623d3584995 (patch) | |
tree | 646eff653b1747cd452e0e1349c6622e3d078407 /src/Crypto/Macaroon/Serializer | |
parent | c1e083c0be9f3791fa5527533a33eef63ebef497 (diff) | |
download | hmacaroons-7986de7cc40d5c063805b060c1796623d3584995.tar.gz hmacaroons-7986de7cc40d5c063805b060c1796623d3584995.tar.zst hmacaroons-7986de7cc40d5c063805b060c1796623d3584995.zip |
Haddock markup
[ci skip]
Diffstat (limited to 'src/Crypto/Macaroon/Serializer')
-rw-r--r-- | src/Crypto/Macaroon/Serializer/Base64.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Crypto/Macaroon/Serializer/Base64.hs b/src/Crypto/Macaroon/Serializer/Base64.hs index f6527c2..053d967 100644 --- a/src/Crypto/Macaroon/Serializer/Base64.hs +++ b/src/Crypto/Macaroon/Serializer/Base64.hs | |||
@@ -55,6 +55,7 @@ packetize key dat = do | |||
55 | putByteString dat | 55 | putByteString dat |
56 | putByteString "\n" | 56 | putByteString "\n" |
57 | 57 | ||
58 | -- | Deserialize a macaroon from a base64url-encoded ByteString | ||
58 | deserialize :: BS.ByteString -> Either String Macaroon | 59 | deserialize :: BS.ByteString -> Either String Macaroon |
59 | deserialize = parseOnly macaroon . B64.decodeLenient | 60 | deserialize = parseOnly macaroon . B64.decodeLenient |
60 | 61 | ||