diff options
author | Julien Tanguy <julien.tanguy@jhome.fr> | 2015-05-15 18:17:13 +0200 |
---|---|---|
committer | Julien Tanguy <julien.tanguy@jhome.fr> | 2015-05-15 23:10:16 +0200 |
commit | b7889567b811ac347acff9983d15ab0e91c76876 (patch) | |
tree | 87bb1639a938426e5d8437c7bd5cae1fc84993be /src | |
parent | 5d1b7d51854d355bf5b6438c1a96ce9e743fd810 (diff) | |
download | hmacaroons-b7889567b811ac347acff9983d15ab0e91c76876.tar.gz hmacaroons-b7889567b811ac347acff9983d15ab0e91c76876.tar.zst hmacaroons-b7889567b811ac347acff9983d15ab0e91c76876.zip |
Add newlines between Caveats in Macaroon's show
[ci skip]
Diffstat (limited to 'src')
-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 | ||