aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/Crypto/Macaroon/Binder.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Crypto/Macaroon/Binder.hs')
-rw-r--r--src/Crypto/Macaroon/Binder.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Crypto/Macaroon/Binder.hs b/src/Crypto/Macaroon/Binder.hs
index 3ec3d67..91f07ce 100644
--- a/src/Crypto/Macaroon/Binder.hs
+++ b/src/Crypto/Macaroon/Binder.hs
@@ -24,5 +24,5 @@ newtype Binder = Binder { bind :: Macaroon -> Macaroon -> BS.ByteString }
24 24
25-- | Binder which concatenates the two signatures and hashes them 25-- | Binder which concatenates the two signatures and hashes them
26hashSigs :: Binder 26hashSigs :: Binder
27hashSigs = Binder $ \m m' -> toBytes $ (HMAC . hash $ BS.append (toBytes $ signature m') (toBytes $ signature m) :: HMAC SHA256) 27hashSigs = Binder $ \m m' -> toBytes (HMAC . hash $ BS.append (toBytes $ signature m') (toBytes $ signature m) :: HMAC SHA256)
28 28