1 files changed, 1 insertions, 1 deletions
diff --git a/xmpp.scm b/xmpp.scm
index 70b92a0..b458b54 100644
--- a/xmpp.scm
+++ b/xmpp.scm
@@ -57,7 +57,7 @@ is unregistered."
 Then try all other handlers."
   (let ((id-handler (hash-ref *stanza-id-handlers* (stanza-id stanza))))
     (catch 'halt
-      (lambda _
+      (lambda ()
         (when id-handler (id-handler stanza))
         (try-stanza-handlers stanza))
       (lambda (key . args)