diff options
| author | Julien Tanguy <julien.tanguy@jhome.fr> | 2015-06-17 17:17:36 +0200 |
|---|---|---|
| committer | Julien Tanguy <julien.tanguy@jhome.fr> | 2015-06-17 17:17:36 +0200 |
| commit | dfcc13bda0f07f012e385d39ea86d7c6e9f9e05f (patch) | |
| tree | 3bf3c0104c4051aa94b8cce5b667b0b19a6c6d5b /src/Crypto/Macaroon/Internal.hs | |
| parent | 8fad4fa9d1b592ece4806dcd9abb6c011d3948bf (diff) | |
| parent | 62576139b8dbf2cd0d3c04e927b9df2d0805a199 (diff) | |
| download | hmacaroons-dfcc13bda0f07f012e385d39ea86d7c6e9f9e05f.tar.gz hmacaroons-dfcc13bda0f07f012e385d39ea86d7c6e9f9e05f.tar.zst hmacaroons-dfcc13bda0f07f012e385d39ea86d7c6e9f9e05f.zip | |
Add basic macaroon verification
Diffstat (limited to 'src/Crypto/Macaroon/Internal.hs')
| -rw-r--r-- | src/Crypto/Macaroon/Internal.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Crypto/Macaroon/Internal.hs b/src/Crypto/Macaroon/Internal.hs index 116f5ed..2f56512 100644 --- a/src/Crypto/Macaroon/Internal.hs +++ b/src/Crypto/Macaroon/Internal.hs | |||
| @@ -58,7 +58,7 @@ instance Show Macaroon where | |||
| 58 | show (MkMacaroon l i c s) = intercalate "\n" [ | 58 | show (MkMacaroon l i c s) = intercalate "\n" [ |
| 59 | "location " ++ B8.unpack l | 59 | "location " ++ B8.unpack l |
| 60 | , "identifier " ++ B8.unpack i | 60 | , "identifier " ++ B8.unpack i |
| 61 | , concatMap show c | 61 | , intercalate "\n" (map show c) |
| 62 | , "signature " ++ B8.unpack (hex s) | 62 | , "signature " ++ B8.unpack (hex s) |
| 63 | ] | 63 | ] |
| 64 | 64 | ||