Switch irc.scm to use %8sync-run

[8sync.git] / 8sync / systems / irc.scm

diff --git a/8sync/systems/irc.scm b/8sync/systems/irc.scm
index 7ab93169186451fdf936bf9edf96b129210fe3b3..1333c3c5868424a19f12ee1812c06063dfd3554a 100755 (executable)
--- a/8sync/systems/irc.scm
+++ b/8sync/systems/irc.scm
@@ -239,10 +239,10 @@
              ;; reset buffer
              (set! buffer '())
              ;; run it
-             (%8sync (%run (handle-line
-                            socket
-                            ready-line
-                            username)))))
+             (%8sync-run (handle-line
+                          socket
+                          ready-line
+                          username))))
           (_ #f))))
     irc-handler))