rename %sync stuff to %8sync (thanks for the suggestion, daviid)
[8sync.git] / eightsync / systems / irc.scm
index ac9c4e64b65a50672a1883df67bd33cf98860f5c..e45db1a7c5b81be378a8327ccf4142c058be25d4 100755 (executable)
         (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)))