X-Git-Url: https://jxself.org/git/?a=blobdiff_plain;f=eightsync%2Fsystems%2Firc.scm;h=e45db1a7c5b81be378a8327ccf4142c058be25d4;hb=fb20084ff3904c8445dcc72d1497e1ad6fa775ee;hp=ac9c4e64b65a50672a1883df67bd33cf98860f5c;hpb=39fce509440e467188270625bf728b1c57ef9e26;p=8sync.git diff --git a/eightsync/systems/irc.scm b/eightsync/systems/irc.scm index ac9c4e6..e45db1a 100755 --- a/eightsync/systems/irc.scm +++ b/eightsync/systems/irc.scm @@ -226,7 +226,7 @@ (set! buffer (cons (read-char socket) buffer)) (match buffer ((#\newline #\return (? char? line-chars) ...) - (%sync (%run (handle-line + (%8sync (%run (handle-line socket (list->string (reverse line-chars)) username)))