summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--xmpp.scm4
1 files changed, 1 insertions, 3 deletions
diff --git a/xmpp.scm b/xmpp.scm
index b458b54..bade3c1 100644
--- a/xmpp.scm
+++ b/xmpp.scm
@@ -60,9 +60,7 @@ Then try all other handlers."
(lambda ()
(when id-handler (id-handler stanza))
(try-stanza-handlers stanza))
- (lambda (key . args)
- ;; return whatever argument was passed to 'halt
- (car args)))))
+ (lambda (key . args) args))))
(define* (run-handler-loop port #:optional (log-port #t))
"Repeatedly check for incoming stanzas. When a stanza handler