summaryrefslogtreecommitdiff
path: root/hmac.rkt
diff options
context:
space:
mode:
Diffstat (limited to 'hmac.rkt')
-rw-r--r--hmac.rkt4
1 files changed, 2 insertions, 2 deletions
diff --git a/hmac.rkt b/hmac.rkt
index 9ffa453..297b126 100644
--- a/hmac.rkt
+++ b/hmac.rkt
@@ -43,14 +43,14 @@
'left)])
(hashfn (bytes-append (integer->bytes/size
(bitwise-xor (bytes->integer opad)
- (bytes->integer key))
+ (bytes->integer padded-key))
blocksize)
(integer->bytes/size
(hashfn
(bytes-append
(integer->bytes/size
(bitwise-xor (bytes->integer ipad)
- (bytes->integer key))
+ (bytes->integer padded-key))
blocksize)
msg))
hashsize)))))