diff options
| -rw-r--r-- | xep-0114.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/xep-0114.scm b/xep-0114.scm index f882530..9b94408 100644 --- a/xep-0114.scm +++ b/xep-0114.scm @@ -1,5 +1,6 @@ (define-module (gnubba xep-0114) #:use-module (gnubba sha1) + #:use-module (gnubba sugar) #:use-module (ice-9 rdelim) #:use-module (ice-9 regex) #:use-module (sxml simple) @@ -76,7 +77,7 @@ ;; are evaluated in the xmpp monad. (display "Registering handlers...\n") (begin - exp ...) + (xmpp-> sock exp ...)) ;; Blocking wait for stanzas. At this ;; point, new handler can only be |