diff --git a/extra/mason/common/common.factor b/extra/mason/common/common.factor index 50e56ab9bb..80d89182c2 100644 --- a/extra/mason/common/common.factor +++ b/extra/mason/common/common.factor @@ -5,7 +5,7 @@ math.functions make io io.files io.pathnames io.directories io.directories.hierarchy io.launcher io.encodings.utf8 prettyprint combinators.short-circuit parser combinators math calendar calendar.format arrays mason.config locals debugger fry -continuations strings io.sockets ; +continuations strings io.sockets prettyprint.config ; IN: mason.common : print-timestamp ( string -- ) @@ -50,7 +50,7 @@ SYMBOL: current-git-id dup utf8 file-lines parse-fresh [ "Empty file: " swap append throw ] [ nip first ] if-empty ; -: to-file ( object file -- ) utf8 [ . ] with-file-writer ; +: to-file ( object file -- ) utf8 [ [ . ] without-limits ] with-file-writer ; : datestamp ( timestamp -- string ) [