diff --git a/basis/logging/server/server.factor b/basis/logging/server/server.factor index 47656e8655..1872bb0af2 100644 --- a/basis/logging/server/server.factor +++ b/basis/logging/server/server.factor @@ -26,7 +26,7 @@ SYMBOL: log-files : log-stream ( service -- stream ) log-files get [ open-log-stream ] cache ; -: multiline-header 20 CHAR: - ; foldable +: multiline-header ( -- string ) 20 CHAR: - ; foldable : (write-message) ( msg name>> level multi? -- ) [