suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

added newlines to planet's log

Browse Source
This commit is contained in:
Robby Findler 2011-04-28 07:34:03 -05:00
parent 64ba1f2fa4
commit 2d28276c47
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
collects/planet/private/planet-shared.rkt
View File

@ -517,7 +517,10 @@ Various common pieces of code that both the client and server need to access
(close-input-port in) (close-input-port in)
(when outport (close-output-port outport))] (when outport (close-output-port outport))]
[else [else
(when outport (display l outport)) (when outport
(display l outport)
(newline outport)
(flush-output outport))
(planet-log l) (planet-log l)
(loop)])))))) (loop)]))))))
(begin0 (begin0