factor: use more split/join words

[factor.git] / extra / broadcast-server / broadcast-server.factor

diff --git a/extra/broadcast-server/broadcast-server.factor b/extra/broadcast-server/broadcast-server.factor
index a5cf648256fe84516d2d0e2eebc1ea2c81bbe1d6..c5c80a6b0ef9ddf451439287778b0be74d98db18 100644 (file)
--- a/extra/broadcast-server/broadcast-server.factor
+++ b/extra/broadcast-server/broadcast-server.factor
@@ -64,7 +64,7 @@ SINGLETONS: command data ;
             ] [
                 [
                     receive-socket>> receive
-                    [ utf8 decode "\n" split parse-lines ] dip
+                    [ utf8 decode split-lines parse-lines ] dip
                 ] keep handle-data t
             ] if
         ] loop