From d759083e9dcd52b52cea8770fb67490809da741a Mon Sep 17 00:00:00 2001
From: Thomas Hintz <tjhintz@buddy.thintz.com>
Date: Tue, 24 Sep 2013 18:25:31 -0700
Subject: [PATCH] Fix invalid arg type bug introduced in b52b480.

---
 hmac.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/hmac.scm b/hmac.scm
index ebd1290..2f7b7d8 100644
--- a/hmac.scm
+++ b/hmac.scm
@@ -22,7 +22,7 @@
                             (call-with-output-digest
                               digest-primitive
                               (cut display (string-append ipad message) <>)
-                              string))
+                              'string))
              <>)
         'string))))