factor: add newlines to .factor files

[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..37ace19cdcd451972a24067e87564b0433fc7910 100644 (file)
--- a/extra/broadcast-server/broadcast-server.factor
+++ b/extra/broadcast-server/broadcast-server.factor
@@ -1,11 +1,10 @@
 ! Copyright (C) 2021 Doug Coleman.
 ! See http://factorcode.org/license.txt for BSD license.
 USING: accessors arrays assocs calendar combinators
-combinators.extras continuations destructors io
-io.encodings.string io.encodings.utf8 io.files.info io.sockets
-io.streams.string kernel layouts make parser prettyprint
-prettyprint.config sequences splitting system system-info
-threads ;
+continuations destructors io io.encodings.string
+io.encodings.utf8 io.files.info io.sockets io.streams.string
+kernel layouts make parser prettyprint prettyprint.config
+sequences splitting system system-info threads ;
 IN: broadcast-server
 
 TUPLE: broadcast-server < disposable
@@ -64,7 +63,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
@@ -118,4 +117,5 @@ SINGLETONS: command data ;
     ] with-destructors ;
 
 ! "192.168.88.255" 7777 start-broadcast-server
-! "USE: math 2 2 + ." over send-broadcast-command
\ No newline at end of file
+! "USE: math 2 2 + ." over send-broadcast-command
+