mason: some fixes

db4
Slava Pestov 2009-04-25 16:52:23 -05:00
parent 22d14b036a
commit f24bf51289
2 changed files with 3 additions and 3 deletions

View File

@ -2,7 +2,7 @@
! See http://factorcode.org/license.txt for BSD license.
USING: arrays accessors io io.sockets io.encodings.utf8 io.files
io.launcher kernel make mason.config mason.common mason.email
mason.twitter namespaces sequences ;
mason.twitter namespaces sequences prettyprint ;
IN: mason.notify
: status-notify ( input-file args -- )
@ -38,7 +38,7 @@ IN: mason.notify
f { "test" } status-notify ;
: notify-report ( status -- )
[ "Build finished with status: " write print flush ]
[ "Build finished with status: " write . flush ]
[
[ "report" utf8 file-contents ] dip email-report
"report" { "report" } status-notify

View File

@ -28,7 +28,7 @@ IN: mason.report
common-report
_ call( -- xml )
[XML <html><body><-><-></body></html> XML]
pprint-xml
write-xml
] with-file-writer ; inline
:: failed-report ( error file what -- status )